my @mshost1 = (
        "msservername",
        "/local/p0/home/glosefob",
        "/var/spool/cron/crontabs",
        "/local/p0/home/admin/service.etc"
);

sub get_dir {
$client = shift(@mshost1);
@dir = @mshost1;
backup($client);
}