perl -e "print map { $c++ %2 ? chr $_^' ' : chr $_ } unpack 'C*', $ARGV[0]" "like this"