Select Code to Download

$mac = join( ':' => ($mac =~ /(..)/g) );

$mac = join( ':' => ($mac =~ /../g) );

join("", my_slurp_file_function($fname) =~
   /^=begin[ \t]+$sname[ \t]*\n(.*?)^=end[ \t]+$sname[ \t]*$/msg);