# perl -X -c black.pl black.pl syntax OK