__WINDOWS__
C:\usr\local\share\PassThru\perl>perl -wMstrict -le "$a=time;$SIG{ALRM}=sub{$b=time};alarm 2;<>;print $b-$a;sleep 5; print $b-$a"

Use of uninitialized value $b in subtraction (-) at -e line 1, <> line 1.
-1532115756
10