#!/usr/bin/perl use Test::More tests => 10; ok ("This is ok"); ok ("This is ok"); ok ("This is ok");