a guest Feb 5th, 2016 90 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- bash-4.3$ perl -pae'@a=sort$a-$b,grep/^\d/,@F;$_="$a, $a[-1]"' <<< '1 2 3 4 "5"'
- 0, 4
- bash-4.3$ perl --version
- This is perl 5, version 20, subversion 2 (v5.20.2) built for x86_64-linux-gnu-thread-multi
- (with 40 registered patches, see perl -V for more detail)
- Copyright 1987-2015, Larry Wall
- Perl may be copied only under the terms of either the Artistic License or the
- GNU General Public License, which may be found in the Perl 5 source kit.
- Complete documentation for Perl, including FAQ lists, should be found on
- this system using "man perl" or "perldoc perl". If you have access to the
- Internet, point your browser at http://www.perl.org/, the Perl Home Page.
RAW Paste Data