#!/usr/bin/env perl use Test::More; pass("Első teszt"); pass("Második teszt"); subtest 'Altesztpélda' => sub { plan tests => 3; pass("Első alteszt"); pass("Második alteszt"); pass("Harmadik alteszt"); }; pass("Negyedik teszt"); done_testing();