Help for this page

Select Code to Download


  1. or download this
    # BAD!
    perl -E'my $cmd = "@ARGV"; print `$cmd`' cat /etc/passwd
    
  2. or download this
    # BETTER!
    perl -MSafe -E'my $c=Safe->new; my $cmd = $c->reval("@ARGV"); print `$
    +cmd`' cat /etc/passwd