Journal Journal: Some PERL for pr0n 5
#!/usr/bin/perl
for ($i=1; $i<27;$i++) {
for ($j=1; $j<17; $j++) {
`wget -r www.sweetamateurbabes.com/teen/$i/$j.jpg`
}
}
For those of you new to perl, those are backquotes around the wget command - they tell the shell to interpet the command string, after doing variable substitution