in reply to perl -s is evil?
Curiously enough, if you try and use it all (in an == for instance, it reverts back, so it's not as scary as it looks, just a bit buggy:
perl -Tws evil.pl -\>=0 ouputs:
#! /usr/bin/perl use strict; print "\$> = ", $>, "\n"; $> == 1000 and warn "eq"; print "\$> = ", $>, "\n";
perl -Tws evil.pl -\>=0 ouputs:
$> = 0 eq at evil.pl line 5. $> = 1000
In Section
Meditations