die $@ if $@;

##</code><code>##

use Time::HiResqw(gettimeofday tv_interval)

##</code><code>##

    $str   .= ' qw(' . $args . ')' if $args ne '1'";

##</code><code>##

Undefined subroutine &main::gettimeofday called at ...