#!perl -p s/.*/"$&"/