Help for this page

Select Code to Download


  1. or download this
            my $current_path = 'C:\\temp\\';
  2. or download this
            my $get_files = grep { !-d } @process_file; 
        foreach my $get_files (@process_file) {
  3. or download this
            } elsif (rename "$newdir/$get_files", "$newdir/$newfile") {