Hi Monks!
I have a directory on a server somewhere, and I am trying to get all the .jpg images form there and save these images somewhere in my machine or it could be saved somewhere else. But I am having problems open this remote directory, I might be using the wrong Perl code to open this directory, any help?

$dir = "http://myserver.com/images";
opendir(DIR, $dir) or die $!;

    while (my $file = readdir(DIR)) {

        # only files
        next unless (-f "$dir/$file");

        # find files ending in .JPG
        next unless ($file =~ m/\.JPG$/);

        print "$file\n";
        # Here I need to send all found pictures to a location in my l
+ocal directory.

}

closedir(DIR);
exit 0;
[download]