>perl -lwe "sub x{@_} print sort x(qw(q w e r t y))" eqrtwy >perl -lwe "sub xx{@_} print sort xx(qw(q w e r t y))" qwerty