Help for this page

Select Code to Download

Select or download this
```
my $tainted = <STDIN>;
```

Select or download this

my $stillTainted = pack 'a*', $tainted;

Select or download this

open my $fh, '>', $stillTainted or die $!;