# perl -wle 'my $min = $ARGV[0]; $min = -1 if -1 < $min; print $min' -- info
Argument "info" isn't numeric in numeric lt (<) at -e line 1.
-1