home *** CD-ROM | disk | FTP | other *** search
/ Netrunner 2004 October / NETRUNNER0410.ISO / regular / ActivePerl-5.8.4.810-MSWin32-x86.msi / _0615432fc89ff61c0093d06b81af4a46 < prev    next >
Encoding:
Text File  |  2004-06-01  |  831 b   |  31 lines
  1. # NOTE: Derived from ..\..\lib\Storable.pm.
  2. # Changes made here will be lost when autosplit is run again.
  3. # See AutoSplit.pm.
  4. package Storable;
  5.  
  6. #line 91 "..\..\lib\Storable.pm (autosplit into ..\..\lib\auto\Storable\show_file_magic.al)"
  7. sub show_file_magic {
  8.     print <<EOM;
  9. #
  10. # To recognize the data files of the Perl module Storable,
  11. # the following lines need to be added to the local magic(5) file,
  12. # usually either /usr/share/misc/magic or /etc/magic.
  13. #
  14. 0    string    perl-store    perl Storable(v0.6) data
  15. >4    byte    >0    (net-order %d)
  16. >>4    byte    &01    (network-ordered)
  17. >>4    byte    =3    (major 1)
  18. >>4    byte    =2    (major 1)
  19.  
  20. 0    string    pst0    perl Storable(v0.7) data
  21. >4    byte    >0
  22. >>4    byte    &01    (network-ordered)
  23. >>4    byte    =5    (major 2)
  24. >>4    byte    =4    (major 2)
  25. >>5    byte    >0    (minor %d)
  26. EOM
  27. }
  28.  
  29. # end of Storable::show_file_magic
  30. 1;
  31.