Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/perl
- $|=1;
- $count = 0;
- $pid = $$;
- while (<>) {
- chomp $_;
- if ($_ =~ /(.*\.jpg)/i) {
- $url = $1;
- system("/usr/bin/wget", "-q", "-O","/var/www/images/$pid-$count.jpg", "$url");
- system("/usr/bin/mogrify", "-flip","/var/www/images/$pid-$count.jpg");
- system("/bin/chmod", "777","/var/www/images/$pid-$count.jpg");
- print "http://192.168.0.30/images/$pid-$count.jpg\n";
- }
- elsif ($_ =~ /(.*\.png)/i) {
- $url = $1;
- system("/usr/bin/wget", "-q", "-O","/var/www/images/$pid-$count.png", "$url");
- system("/usr/bin/mogrify", "-flip","/var/www/images/$pid-$count.png");
- system("/bin/chmod", "777","/var/www/images/$pid-$count.png");
- print "http://192.168.0.30/images/$pid-$count.png\n";
- }
- elsif ($_ =~ /(.*\.gif)/i) {
- $url = $1;
- system("/usr/bin/wget", "-q", "-O","/var/www/images/$pid-$count.gif", "$url");
- system("/usr/bin/mogrify", "-flip","/var/www/images/$pid-$count.gif");
- system("/bin/chmod", "777","/var/www/images/$pid-$count.gif");
- print "http://192.168.0.30/images/$pid-$count.gif\n";
- }
- else {
- print "$_\n";;
- }
- $count++;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement