Help for this page

Select Code to Download


  1. or download this
    C:\chas_sandbox\PM>bak.pl *.pl
Copy failed: No such file or directory at C:\chas_sandbox\PM\bak.pl li
+ne 34.
  2. or download this
    for my $file (@ARGV) {
    for my $globfile (glob($file)) {
        copy($globfile, "backup/${globfile}_$date") or die "Copy faile
+d: $!";
    }
}
  3. or download this
    C:\chas_sandbox\PM>bak.pl  *.pl

C:\chas_sandbox\PM>