open my $fh,'<',$body_sref
            or die "Couldn't open '\$body_ref' for reading. $!";
        return $fh;