Select Code to Download

 
% stephan@armen (/home/stephan) %
% perl -w sort_context.px
...
called:array:13
called:array:13
called:array:13

% stephan@armen (/home/stephan) %
% perl -MO=Deparse sort_context.px
...
say sort(@{[get_keys()];});
say sort(@{[get_keys()];});
sort_context.px syntax OK