Select Code to Download

{
  local *tmp = \substr( $source, $start, $len );
  $tmp =~ y/'//d;
  $tmp =~ y/a-zA-Z0-9\n\|-/ /c;
}