sub system2 {
        system(@_) ==0 or die($?);
}

