use 5.014; use Test; use Data::Dumper qw(Dumper); use_ok('File'); my $f_from = File->new(); #my $f_to = File->new(); <--------- Note this line is commented out $f_from->section_add('BLAH'); print Dumper $f_from;