johngg@shiraz:~/perl/Monks > perl -Mstrict -Mwarnings -E '
my @items = q{a} .. q{g};
s{(.*)}{"$1"} for @items[ 0, 1, 3, 5, 6];
say for @items;'
"a"
"b"
c
"d"
e
"f"
"g"