use warnings;
use strict;

use lib '.';

use B;

print "\nneed 2 (or 3 if die()) args...\n" and exit if @ARGV < 2;

print "procID: $$\n";

if (defined $ARGV[2]){
    die "main script has died";
}

B->run(@ARGV);