Agatha had some complaints about her chicken cam. People weren’t seeing enough chicken booty. A quick and easy way to do this is to use Perl:
while(6 ne 9){ for($c=1;$c<11;$c++){ system("scp root\@crackers:/chickenpicture.jpg /home/u-1/chickencam"); system("scp /home/u-1/chickencam/chickenpicture.jpg root\@signalq.com:/web/path/here/"); system("scp /home/u-1/chickencam/chickenpicture.jpg root\@signalq.com:/web/path/here/archive/chickenpicture".$c.".jpg"); sleep 300; } } |
This way, the chicken cam cycles through. The only tricky part is escaping the @ symbols. You can see the results here.