File Coverage

Test_Progs/nested2a
Criterion Covered Total %
statement 30 128 23.4
branch 6 86 6.9
condition 3 26 11.5
subroutine 2 2 100.0
pod n/a
total 41 242 16.9


line stmt bran cond sub pod time code
1             #! /usr/bin/perl -w
2              
3 1         5 my $VERSION = 1.02;
4              
5 1     1   8 use blib;
  1         8  
  1         89  
6              
7 1     1   1104 use Shell::POSIX::Select;
  1         2  
  1         6  
8              
9             select (1) { select (2) { } }