1#!/usr/bin/perl 2use strict; 3use warnings; 4use Test::More tests => 3; 5BEGIN { use_ok('class_ignore') } 6require_ok('class_ignore'); 7 8# adapted from ../python/class_ignore_runme.py 9 10my $a = class_ignore::Bar->new(); 11 12is(class_ignore::do_blah($a), "Bar::blah"); 13