BEGIN {
$0 = '-e';
}
use Test::More 'no_plan';
use_ok Getopt::Euclid;
# When running into eval mode, e.g. perl -e 'use Getopt::Euclid', @ARG is empty
# but $0 is '-e'. This leads to the warnings:
# skipping file: '-e': no matches found
# Use of uninitialized value in localtime at lib/Getopt/Euclid.pm line 370.
ok 1;