perl -MO=Xref YIKES.pl