The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

MANWAR / Map-Tube-4.01 / t / lib / BadSample.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11

              
#!/usr/bin/perl
package BadSample;
use 5.006;
use File::Spec;
use Moo;
use namespace::clean;
has xml => ( is => 'ro', default => sub { return File::Spec->catfile( 't', 'sample.xml' ) } );
1;