my @vals = $ARGV[ 0 ] =~ /..?/g;
print @vals;