perl -e "@alpha = qw|d e f g h|; print (shift @alpha, shift @alpha);"