1.15: Actual Generated Code For Schwartzian Transform

sub {
	
	return 
	map $_->[0],
	sort {
	$a->[1] cmp $b->[1]
		||
	$a->[2] <=> $b->[2]

	}
	map [ $_,
		do{ my ($val) = m((?-xism:^foo(\w+))) ; $val },
		do{ my ($val) = m((?-xism:(\d+)$)) ; $val }
	], @_  ;
}