File Coverage

blib/lib/Language/Befunge/lib/FOO.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 2 2 100.0
total 14 14 100.0


line stmt bran cond sub pod time code
1             #
2             # This file is part of Language-Befunge
3             #
4             # This software is copyright (c) 2003 by Jerome Quelin.
5             #
6             # This is free software; you can redistribute it and/or modify it under
7             # the same terms as the Perl 5 programming language system itself.
8             #
9 1     1   4 use strict;
  1         1  
  1         29  
10 1     1   3 use warnings;
  1         2  
  1         84  
11              
12             package Language::Befunge::lib::FOO;
13             # ABSTRACT: extension to print foo
14             $Language::Befunge::lib::FOO::VERSION = '5.000';
15 3     3 1 10 sub new { return bless {}, shift; }
16              
17             sub P {
18 2     2 1 78 print "foo";
19             }
20              
21             1;
22              
23             __END__