Select Code to Download

   warn 'tab' unless unescape("\\t")  eq "\t";   #works
   warn 'nl'  unless unescape("\\n")  eq "\n";   #fails
...

      return $s;
   }