Roll Call

[Perl Monger]

PerlMongers,

Is anyone working on anything important?

I got a shell script that could be converted to do backups using the tar
command.

Have you found any cool hacks?

regards,

// David //
--
#!/usr/bin/perl -iake_one_down_pass_it_around:_bottles_of_beer:_on_the_wall:99
for(($t,$a,$b,$i)=split/:/,$^I;$i;print){$_="-$i$a$b,-$i$a,-T$t,-".--$i."$a$b-";
s/(-1_.*?e)s/$1/g; y/_-/ \n/ } # by Randolph Chung and Joey Hess