Help for this page

Select Code to Download


  1. or download this
    {
    no warnings 'uninitialized';
    $line =~ s/(<[^>]*>|\$[0-9])|\$/$1/g;
}