$ perl scriptA.pl --verbose
you want output.
$ perl scriptA.pl