Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    {   say $file ; }
    $d->renameL("testfile.txt", "testedfile.txt") or die "didn't rename! $
    +!";
    exit ;
    
  2. or download this
    D:\Desktop\test>rename.pl
    .
    ...
    rename.pl
    testfile.txt
    didn't rename!  at D:\Desktop\test\Onefile\test\rename.pl line 12.