Help for this page

Select Code to Download


  1. or download this
    VinsWorldcom@C:\Users\VinsWorldcom\tmp> client.pl
    Time::HiRes::clock(): unimplemented in this platform at C:\Users\VinsW
    +orldcom\tmp\client.pl line 6.
    BEGIN failed--compilation aborted at C:\Users\VinsWorldcom\tmp\client.
    +pl line 6.
    
  2. or download this
    #use Time::HiRes qw( time gettimeofday clock );
    use Time::HiRes qw( time gettimeofday );
    use POSIX qw(CLOCKS_PER_SEC);
    
  3. or download this
    #    my $clock_t0 = clock();
    my ($clock_t0, $clock_t1);
    ...
    
    #    my $clock_t1 = clock();
    (undef, undef, $clock_t1, undef, undef) = POSIX::times();