t/eating_strict_error_2.fail

   1 #!perl
   2 use strict;
   3 use Function::Parameters;
   4
   5 fun get_ip( $agent ) {
   6 }
   7
   8 fun get_record( $agent, $target_name ) {
   9         for my $record ( @$records ) {
  10         }
  11 }
  12
  13 'ok'