#!perl -p
y/.$/* /