Select Code to Download

use Data::Dumper;
sub foo { return (); }
warn Dumper(sort foo('1000'));

$VAR1 = '1000';