приветствую. нужно замерить скорость выполнения программы, как это делает утилита time из *nix, но для win32.
разве что - .bat с time/t. секунд, увы не покажет хотя и можно с сотыми долями секунд, может кто знает, как вводить символ Enter с copy con? whexp, ясно) коли кодишь на мс, то всё проще, функций работы со временем достаточно, на твой выбор)
Возможно, такой скриптик поможет Code: #!/usr/bin/perl use strict; use warnings; use Time::HiRes qw /gettimeofday/; die "wrong param count\n" if scalar @ARGV == 0; my $time_start = gettimeofday; my $prog_name = shift; open my $F, '-|', $prog_name, @ARGV or die "open() error: $!\n"; print while <$F>; close $F; my $time = sprintf '%.2f', gettimeofday - $time_start; print "\nExecution time: ", $time, " sec.\n";