elapsed time in milliseconds

[imad77]

Hi,

I need to get the elapsed time in milliseconds after running some commands.

I tried that but I get seconds:


Have you any suggestion?

thanks
=============
#!/usr/bin/perl
use Time::Local;

$start = time;

commands;

$elapsed = time - $start;
print "Time elapsed: $elapsed\n";

 

[Zhris]

Hi,

To use a higher resolution of time (beyond seconds) you should look into using a module such as Time::HiRes (

http://search.cpan.org/~jhi/Time-HiRes-1.9719/HiRes.pm).

Chris

 

[imad77]

Oh great thanks, I installed this package or library and it works fine.

Here is what I tried and works fine for other people in the future:
===========
#!/usr/bin/perl
use Time::HiRes qw[gettimeofday tv_interval];

my $time1=[gettimeofday()];

commands;

my $milliseconds = tv_interval($time1)*1000;



printf "Elapsed time: %d milliseconds\n", $milliseconds;