Help for this page

Select Code to Download

Select or download this

# Program tee
#!/usr/bin/perl -w
...
}

close (OUT) or die $!;