#!/usr/bin/env perluse strict;use warnings; use lib 'lib'; use App::WRT::Date; use Test::More tests => 1; ok( App::WRT::Date::get_mtime('t/wrt.t') =~ m/\d+/, 'get_mtime returns digits.'); # TODO: this:# my $iso_date = WRT::Date::iso_date(0);