#!perl -ln
print chop|y// /crx/ /,glob