echo print uc ok > pmctest.pmc perl -Mpmctest -le1