Help for this page
#!/usr/bin/perl BEGIN {(*STDERR = *STDOUT) || die;} ... binmode ARGVOUT if $. == 1; s/$string_to_be_removed//g; print; }