&mysub2(mysub1);
sub mysub1{
    #normally returns an array.
    
    #on error 
    return undef;
}
sub mysub2{
    my @array = @_;
    unless(@array){
        print "Array is not defined" #Expected out come
    }else{
        print "Exists";
    }
}