my ( $arg1 , $arg2, $arg3 )=@ARGV; #### system (test.pl,$number,$name,$type);