Select Code to Download

#!/usr/bin/perl -w
use strict;
...
}

testmap();

sjc:PST:PDT:PST

package MAN::ER::SRole::Base;
use strict;
...
    $self->ensureprocess($_) foreach @processes;
    $self->check_timezone();
}

$VAR1 = {
          'HASH(0x88eb640)' => undef,
          'sjc' => {}
        };
sjc:::PST