use Test::More *; like(getcwd(), /Nana/i); done_testing();