my $arg00 = 0 + shift @ARGV;