in reply to How to write the perl script for the following linux command?

Can you please also describe in English what this command is supposed to do?

Most likely, File::Find and File::Copy implement most of the functionality you will need.

  • Comment on Re: How to write the perl script for the following linux command?

Replies are listed 'Best First'.
Re^2: How to write the perl script for the following linux command?
by finddata (Sexton) on Mar 14, 2017 at 12:14 UTC
    The above command will find the source location and fetches for (*.csv files) and store the same directory structure at destination.
[reply]

      So, what Perl code did you write, for example using the modules I mentioned already, and how does it fail to do what you need?

[reply]
        my $sorce_direcrtory = $input_dir;
    my $new_directory = $output_dir;

    opendir(my $dh, $sorce_direcrtory) || die;
    while(readdir $dh) {
        if($_ =~ /.csv/){
            copy("$sorce_direcrtory/$_", "$new_directory/$_");
        }
    }
    closedir $dh;

        [download]
        error: Use of uninitialized value in pattern match (m//)
[reply]
[d/l]

In Section Seekers of Perl Wisdom