#!/usr/bin/env perl use strict; use warnings; use Test::More; ok(1); is("foo", "foo", "is foo foo?"); done_testing;