Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w
use strict;
...
__DATA__
Foo<iT></It>Bar
Baz<it>!</it>Qux

Select or download this

Before: $VAR1 = "Foo<iT></It>Bar\nBaz<it>!</it>Qux\n";
After:  $VAR1 = "FooBar\nBaz<it>!</it>Qux\n";