Select Code to Download

main::usage() called too early to check prototype at X:\bin\backup.pl 
+line 18.
main::usage() called too early to check prototype at X:\bin\backup.pl 
+line 26.

#!/usr/bin/perl -w
#
# backup - perform a daily or weekly backup of a preset list of files.
...
END_USAGE
    exit 1;
}