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

##</code><code>##

eval "require Time::HiRes qw(gettimeofday tv_interval)"

##</code><code>##

#!/usr/bin/perl -w

use strict;

use Getopt::Std;
use POSIX qw(strftime);

my @perl_modules = (
	"Encode",
	"HTML::SimpleLinkExtor",
	"HTTP::Cookies",
	"HTTP::Request::Common",
	"HTTP::Response",
	"LWP::UserAgent",
	"Net::Abuse::Utils",
	"Time::HiRes",
);

foreach my $module (@perl_modules){
	eval "require $module";
	if ($@){
		print " [!] Error : $module perl module seems is missing. Do you want install it now via CPAN? (y/n) ";
		my $answer = <STDIN>;
		chomp $answer;
		if ($answer =~ m/y/i) {
			require CPAN;
			CPAN::install $module;
		} else {
			die " [!] Error : I can't install $module. It's required!\n";
		}
	} else {
		if ($module =~ m/HTTP::Request::Common/){
			eval "require HTTP::Request::Common qw(GET)";
		}		
		if ($module =~ m/Net::Abuse::Utils/){
			eval 'Net::Abuse::Utils qw(:all)';
		}		
		if ($module =~ m/Time::HiRes/){
			eval 'Time::HiRes qw(gettimeofday tv_interval)';
		}		
	}
}

....
....
....

my $start_time = gettimeofday();

....
....
....