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