Help for this page
BEGIN { $ms = Win32::GetTickCount(); ... END { warn 'This script took ',Win32::GetTickCount() - $ms,'miliseconds'; }