Lines Matching refs:data
12 # This test tries to craft malicious data to test out as many different
101 my $data = shift;
105 print FH $data or die "Can't print to '$file': $!";
112 my $data = shift;
113 return eval {thaw $data};
117 my ($data, $sub, $magic_len, $what) = @_;
118 for my $i (0 .. length ($data) - 1) {
119 my $short = substr $data, 0, $i;
134 my ($data, $sub, $what, $name) = @_;
136 my $clone = &$sub($data);
252 "/^Storable binary image v$header->{major}.$minor4 contains data of type 255. This Storable is v$header->{major}.$minor and can only handle data types up to 26/",