#!/usr/bin/perl use strict; use warnings; use Test::More; my $tests; plan tests => 1; BEGIN {$tests += 1; } #use Net::RawIP; #print timem(); ok(1);