File Coverage

lib/Test/WWW/Mechanize/Driver/YAMLLoader.pm
Criterion Covered Total %
statement 9 10 90.0
branch n/a
condition n/a
subroutine 3 4 75.0
pod 0 2 0.0
total 12 16 75.0


line stmt bran cond sub pod time code
1             package Test::WWW::Mechanize::Driver::YAMLLoader;
2 9     9   44 use strict; use warnings;
  9     9   16  
  9         267  
  9         43  
  9         14  
  9         1173  
3             our $VERSION = 1.0;
4              
5             =pod
6              
7             =head1 NAME
8              
9             Test::WWW::Mechanize::Driver::YAMLLoader - Load Test::WWW::Mechanize tests from YAML files
10              
11             =head1 SYNOPSIS
12              
13             my $loader = Test::WWW::Mechanize::Driver::YAMLLoader->new;
14             my @documents = $loader->load( $file );
15              
16             This module is used by Test::WWW::Mechanize::Driver to load YAML files.
17              
18             =cut
19              
20             sub new {
21 1     1 0 3 my $class = shift;
22 1         11 require YAML;
23 1         5 return $class;
24             }
25              
26             sub load {
27 0     0 0   YAML::LoadFile( $_[1] );
28             }
29              
30              
31              
32             1;
33              
34             __END__