banana/opus-data
2
Fork 0
Code Releases Activity

Redirect output into black hole

Browse Source
This commit is contained in:
Ruben Hartenstein (PEA4-Fe) 2021-02-19 14:37:29 +00:00
parent 4fe43d8ecb
commit 797644ebdc
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
OpusData.R
View File

@ -13,7 +13,7 @@ file_path <- paste0(path, file_name)
data <- read_opus_univ(file_path, 5) data <- read_opus_univ(file_path, 5)
# Move the file to OPUS_old where it will remain temporarily in case of an error # Move the file to OPUS_old where it will remain temporarily in case of an error
file.move(file_path, "OPUS_old/") file.move(file_path, "OPUS_old/", overwrite = TRUE)
# Replace last "." with "_", add ".DPT" # Replace last "." with "_", add ".DPT"
file_name <- paste0(sub(".([^.]*)$", "_\\1", file_name), ".DPT") file_name <- paste0(sub(".([^.]*)$", "_\\1", file_name), ".DPT")

6
dirMonitor.sh
View File

@ -1,5 +1,5 @@
#!/bin/bash #!/bin/bash
inotifywait -m OPUS -e create -e moved_to | inotifywait -m -q OPUS -e create -e moved_to |
while read fpath action file; do while read fpath action file; do
Rscript OpusData.R $fpath $file Rscript OpusData.R $fpath $file >& /dev/null
done done