Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    }
    
    print join "\n", map {"$_ => $INPUT{$_}"} sort keys %INPUT;
    
  2. or download this
    xxx1 => val1
    xxx2 => val2
    xxxc => 2