Help for this page

Select Code to Download

Select or download this

$count = eval "tr/$oldlist/$newlist/";
die if $@; # propagates exception from illegal eval contents