#!/usr/bin/perl
use strict;
use if $^V >= v5.7.3 => Time::HiRes:: => time => ();