void
gettimeofday()
        PREINIT:
        struct timeval Tp;
        PPCODE:
        int status;
        status = gettimeofday (&Tp, NULL);
        if (status == 0) {
             if (GIMME == G_ARRAY) {
                 EXTEND(sp, 2);
                 PUSHs(sv_2mortal(newSViv(Tp.tv_sec)));
                 PUSHs(sv_2mortal(newSViv(Tp.tv_usec)));
             } else {
                 EXTEND(sp, 1);
                 PUSHs(sv_2mortal(newSVnv(Tp.tv_sec + (Tp.tv_usec / 1000000.0))));
             }
        }