recognize data files created by Perl Storable module, from the output

of Storable::show_file_magic().
This commit is contained in:
grant 2004-04-10 08:58:02 +00:00
parent ae6d7b8002
commit 144cb3e439
1 changed files with 14 additions and 0 deletions

View File

@ -17,3 +17,17 @@
# XXX: christos matches
#0 regex package Perl5 module source text (via regex)
0 string package Perl5 module source text
# Perl Storable data files.
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)