18 die "MoreData requires an open tag: $!" unless ($opentag); 30 die "No format specified in args or configuration: $!" unless $format; 33 unless (scalar($substrings_aref)) { # no stringrefs returned 34 die "cannot extract substrings from string: $!"; 35 } 42 length($datasep_cfg) or die "The data separation string must be configured: $!"; 44 length($hashsep_cfg) or die "The hash separation string must be configured: $!"; 52 } else { 53 die "no format : $!"; 54 }