in reply to Difficulties with split

Or you could use a regular expression to do what you want:

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

Replies are listed 'Best First'.
Re^2: Difficulties with split
by przemo (Scribe) on Apr 28, 2009 at 14:09 UTC
    Don't forget about the last char in strings of odd length:
    my @vals = $ARGV[ 0 ] =~ /..|.$/g; print @vals;

      OK:

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