blob: 3545ba0631c0c0794282a69acdc5ecbfa874a963 [file] [log] [blame]
# NOTE: Derived from ../../lib/Storable.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Storable;
#line 96 "../../lib/Storable.pm (autosplit into ../../lib/auto/Storable/show_file_magic.al)"
sub show_file_magic {
print <<EOM;
#
# To recognize the data files of the Perl module Storable,
# the following lines need to be added to the local magic(5) file,
# usually either /usr/share/misc/magic or /etc/magic.
#
0 string perl-store perl Storable(v0.6) data
>4 byte >0 (net-order %d)
>>4 byte &01 (network-ordered)
>>4 byte =3 (major 1)
>>4 byte =2 (major 1)
0 string pst0 perl Storable(v0.7) data
>4 byte >0
>>4 byte &01 (network-ordered)
>>4 byte =5 (major 2)
>>4 byte =4 (major 2)
>>5 byte >0 (minor %d)
EOM
}
# end of Storable::show_file_magic
1;