unshift @_, qw( 3 6 nice -20 )
   unless  $_[0] =~ /^\d*\.?\d+$/;