#! perl -pl