diff options
Diffstat (limited to 'test/bbackupd/testfiles/notifyscript.pl.in')
-rwxr-xr-x | test/bbackupd/testfiles/notifyscript.pl.in | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/test/bbackupd/testfiles/notifyscript.pl.in b/test/bbackupd/testfiles/notifyscript.pl.in new file mode 100755 index 00000000..df0e5a2d --- /dev/null +++ b/test/bbackupd/testfiles/notifyscript.pl.in @@ -0,0 +1,15 @@ +#!@PERL@ + + +my $f = 'testfiles/notifyran.'.$ARGV[0].'.'; +my $n = 1; + +while(-e $f.$n) +{ + $n ++; +} + +open FL,'>'.$f.$n; +print FL localtime(); +close FL; + |