#!/usr/bin/perl -Tw
use lib 'where/a/pm/resides';
use strict;
use A;
use B;

a;

b;

exit;