X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_link;h=8bd8dc1a8403fc060249299725fec161976e6e60;hp=b8f74819a7aab28b551666e1512e78017251b3bd;hb=0697368bbcef14908cd4684cf07744dc840464de;hpb=69adb627ebd6145bc9bc5815093828306db17767 diff --git a/bin/BackupPC_link b/bin/BackupPC_link index b8f7481..8bd8dc1 100755 --- a/bin/BackupPC_link +++ b/bin/BackupPC_link @@ -39,7 +39,7 @@ # #======================================================================== # -# Version 1.6.0_CVS, released 10 Dec 2002. +# Version 2.0.0_CVS, released 18 Jan 2003. # # See http://backuppc.sourceforge.net. # @@ -70,7 +70,7 @@ if ( @ARGV != 1 ) { print("usage: $0 \n"); exit(1); } -if ( $ARGV[0] !~ /^([\w\.-]+)$/ ) { +if ( $ARGV[0] !~ /^([\w\.-\s]+)$/ ) { print("$0: bad host name '$ARGV[0]'\n"); exit(1); } @@ -105,7 +105,7 @@ while ( 1 ) { # $CurrDumpDir = "$Dir/$Backups[$num]{num}"; $Compress = $Backups[$num]{compress}; - if ( open(NEW, "$Dir/NewFileList.$Backups[$num]{num}") ) { + if ( open(NEW, "<", "$Dir/NewFileList.$Backups[$num]{num}") ) { while ( ) { chomp; next if ( !/(\w+) (\d+) (.*)/ );