perl -wce'use A'