Branch Coverage

lib/File/Type.pm

Criterion	Covered	Total	%
branch	498	958	51.9

line	true	false	branch
21	10	8	if (length $argument > 1024 or $argument =~ /\n/)
27	6	2	if (-e $argument)
28	6	0	if (not -d $argument) { }
58	0	54	if ($data =~ /^TADS/)
61	0	54	if ($data =~ /^Core\001/)
64	0	54	if ($data =~ /^AMANDA\:\ TAPESTART\ DATE/)
67	54	0	if (length $data > 0)
69	0	54	if ("\000\000\cC\363" eq $substr)
73	54	0	if (length $data > 0)
75	0	54	if ("\000\000\cC\347" eq $substr)
79	54	0	if (length $data > 0)
81	0	54	if ("\000\000\cA\263" eq $substr)
85	54	0	if (length $data > 0)
87	0	54	if ("\000\000\cA\272" eq $substr)
91	54	0	if (length $data > 0)
93	0	54	if ("\377\360" eq $substr)
97	0	54	if ($data =~ /^MOVI/)
100	54	0	if (length $data > 4)
102	3	51	if (defined $substr and $substr =~ /^moov/)
106	51	0	if (length $data > 4)
108	0	51	if (defined $substr and $substr =~ /^mdat/)
112	51	0	if (length $data > 8)
114	0	51	if (defined $substr and $substr =~ /^mp42/)
118	51	0	if (length $data > 12)
120	0	51	if (defined $substr and $substr =~ /^mdat/)
124	51	0	if (length $data > 36)
126	0	51	if (defined $substr and $substr =~ /^mdat/)
130	51	0	if (length $data > 0)
132	3	48	if ("0&\262u" eq $substr)
136	0	48	if ($data =~ /^ASF\ /)
139	0	48	if ($data =~ /^\
142	0	48	if ($data =~ /^\
145	0	48	if ($data =~ /^FiLeStArTfIlEsTaRt/)
148	0	48	if ($data =~ /^\x0aGL/)
151	0	48	if ($data =~ /^\x76\xff/)
154	0	48	if ($data =~ /^NuFile/)
157	0	48	if ($data =~ /^N\xf5F\xe9l\xe5/)
160	48	0	if (length $data > 0)
162	0	48	if ("\000\cE\cV\000" eq $substr)
166	48	0	if (length $data > 0)
168	0	48	if ("\000\cE\cV\a" eq $substr)
172	33	15	if (length $data > 257)
174	3	30	if (defined $substr and $substr =~ /^ustar\0/)
178	30	15	if (length $data > 257)
180	0	30	if (defined $substr and $substr =~ /^ustar\040\040\0/)
184	0	45	if ($data =~ /^070707/)
187	0	45	if ($data =~ /^070701/)
190	0	45	if ($data =~ /^070702/)
193	0	45	if ($data =~ /^\!\\ndebian/)
196	0	45	if ($data =~ /^\=\/)
199	0	45	if ($data =~ /^\!\\n__________E/)
202	0	45	if ($data =~ /^\-h\-/)
205	0	45	if ($data =~ /^\!\/)
208	0	45	if ($data =~ /^\/)
211	0	45	if ($data =~ /^\=\/)
214	45	0	if (length $data > 0)
216	0	45	if ("e\377\000\000" eq $substr)
220	45	0	if (length $data > 0)
222	0	45	if ('' eq $substr)
226	0	45	if ($data =~ /^\032archive/)
229	0	45	if ($data =~ /^HPAK/)
232	0	45	if ($data =~ /^\351\,\001JAM\t/)
235	45	0	if (length $data > 2)
237	0	45	if (defined $substr and $substr =~ /^\-lh0\-/)
241	45	0	if (length $data > 2)
243	0	45	if (defined $substr and $substr =~ /^\-lh1\-/)
247	45	0	if (length $data > 2)
249	0	45	if (defined $substr and $substr =~ /^\-lz4\-/)
253	45	0	if (length $data > 2)
255	0	45	if (defined $substr and $substr =~ /^\-lz5\-/)
259	45	0	if (length $data > 2)
261	0	45	if (defined $substr and $substr =~ /^\-lzs\-/)
265	45	0	if (length $data > 2)
267	0	45	if (defined $substr and $substr =~ /^\-lh40\-/)
271	45	0	if (length $data > 2)
273	0	45	if (defined $substr and $substr =~ /^\-lhd\-/)
277	45	0	if (length $data > 2)
279	0	45	if (defined $substr and $substr =~ /^\-lh2\-/)
283	45	0	if (length $data > 2)
285	0	45	if (defined $substr and $substr =~ /^\-lh3\-/)
289	45	0	if (length $data > 2)
291	0	45	if (defined $substr and $substr =~ /^\-lh4\-/)
295	45	0	if (length $data > 2)
297	0	45	if (defined $substr and $substr =~ /^\-lh5\-/)
301	0	45	if ($data =~ /^Rar\!/)
304	0	45	if ($data =~ /^SQSH/)
307	0	45	if ($data =~ /^UC2\x1a/)
310	3	42	if ($data =~ /^PK\003\004/)
313	42	0	if (length $data > 10)
315	0	42	if (defined $substr and $substr =~ /^\#\ This\ is\ a\ shell\ archive/)
319	0	42	if ($data =~ /^\*STA/)
322	0	42	if ($data =~ /^2278/)
325	0	42	if ($data =~ /^\000\004\036\212\200/)
328	0	42	if ($data =~ /^\.snd/)
331	0	42	if ($data =~ /^MThd/)
334	0	42	if ($data =~ /^CTMF/)
337	0	42	if ($data =~ /^SBI/)
340	0	42	if ($data =~ /^Creative\ Voice\ File/)
343	42	0	if (length $data > 0)
345	0	42	if ('NTRK' eq $substr)
349	42	0	if (length $data > 8)
351	3	39	if (defined $substr and $substr =~ /^AVI/)
355	39	0	if (length $data > 8)
357	6	33	if (defined $substr and $substr =~ /^WAVE/)
361	0	33	if ($data =~ /^EMOD/)
364	33	0	if (length $data > 0)
366	0	33	if (".ra\375" eq $substr)
370	0	33	if ($data =~ /^MTM/)
373	0	33	if ($data =~ /^if/)
376	0	33	if ($data =~ /^FAR/)
379	0	33	if ($data =~ /^MAS_U/)
382	33	0	if (length $data > 44)
384	0	33	if (defined $substr and $substr =~ /^SCRM/)
388	0	33	if ($data =~ /^GF1PATCH110\0ID\#000002\0/)
391	0	33	if ($data =~ /^GF1PATCH100\0ID\#000002\0/)
394	0	33	if ($data =~ /^JN/)
397	0	33	if ($data =~ /^UN05/)
400	0	33	if ($data =~ /^Extended\ Module\:/)
403	33	0	if (length $data > 21)
405	0	33	if (defined $substr and $substr =~ /^\!SCREAM\!/)
409	12	21	if (length $data > 1080)
411	0	12	if (defined $substr and $substr =~ /^M\.K\./)
415	12	21	if (length $data > 1080)
417	0	12	if (defined $substr and $substr =~ /^M\!K\!/)
421	12	21	if (length $data > 1080)
423	0	12	if (defined $substr and $substr =~ /^FLT4/)
427	12	21	if (length $data > 1080)
429	0	12	if (defined $substr and $substr =~ /^4CHN/)
433	12	21	if (length $data > 1080)
435	0	12	if (defined $substr and $substr =~ /^6CHN/)
439	12	21	if (length $data > 1080)
441	0	12	if (defined $substr and $substr =~ /^8CHN/)
445	12	21	if (length $data > 1080)
447	0	12	if (defined $substr and $substr =~ /^CD81/)
451	12	21	if (length $data > 1080)
453	0	12	if (defined $substr and $substr =~ /^OKTA/)
457	12	21	if (length $data > 1080)
459	0	12	if (defined $substr and $substr =~ /^16CN/)
463	12	21	if (length $data > 1080)
465	0	12	if (defined $substr and $substr =~ /^32CN/)
469	0	33	if ($data =~ /^TOC/)
472	33	0	if (length $data > 0)
474	0	33	if ("\377\372" eq $substr)
478	3	30	if ($data =~ /^ID3/)
481	0	30	if ($data =~ m[^\/\/])
484	0	30	if ($data =~ /^\\1cw\ /)
487	0	30	if ($data =~ /^\\1cw/)
490	30	0	if (length $data > 0)
492	0	30	if ("\205\cA\cT\000" eq $substr)
496	30	0	if (length $data > 0)
498	0	30	if ("\205\cA\313\000" eq $substr)
502	30	0	if (length $data > 4)
504	0	30	if (defined $substr and $substr =~ /^pipe/)
508	30	0	if (length $data > 4)
510	0	30	if (defined $substr and $substr =~ /^prof/)
514	0	30	if ($data =~ /^\:\ shell/)
517	0	30	if ($data =~ m[^\#\!\/bin\/sh])
520	0	30	if ($data =~ m[^\#\!\ \/bin\/sh])
523	0	30	if ($data =~ m[^\#\!\t\/bin\/sh])
526	0	30	if ($data =~ m[^\#\!\/bin\/csh])
529	0	30	if ($data =~ m[^\#\!\ \/bin\/csh])
532	0	30	if ($data =~ m[^\#\!\t\/bin\/csh])
535	0	30	if ($data =~ m[^\#\!\/bin\/ksh])
538	0	30	if ($data =~ m[^\#\!\ \/bin\/ksh])
541	0	30	if ($data =~ m[^\#\!\t\/bin\/ksh])
544	0	30	if ($data =~ m[^\#\!\/bin\/tcsh])
547	0	30	if ($data =~ m[^\#\!\ \/bin\/tcsh])
550	0	30	if ($data =~ m[^\#\!\t\/bin\/tcsh])
553	0	30	if ($data =~ m[^\#\!\/usr\/local\/tcsh])
556	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/tcsh])
559	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/tcsh])
562	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/tcsh])
565	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/tcsh])
568	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/zsh])
571	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/zsh])
574	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/zsh])
577	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/ash])
580	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/ash])
583	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/ash])
586	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/ae])
589	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/ae])
592	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/ae])
595	0	30	if ($data =~ m[^\#\!\/bin\/nawk])
598	0	30	if ($data =~ m[^\#\!\ \/bin\/nawk])
601	0	30	if ($data =~ m[^\#\!\t\/bin\/nawk])
604	0	30	if ($data =~ m[^\#\!\/usr\/bin\/nawk])
607	0	30	if ($data =~ m[^\#\!\ \/usr\/bin\/nawk])
610	0	30	if ($data =~ m[^\#\!\t\/usr\/bin\/nawk])
613	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/nawk])
616	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/nawk])
619	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/nawk])
622	0	30	if ($data =~ m[^\#\!\/bin\/gawk])
625	0	30	if ($data =~ m[^\#\!\ \/bin\/gawk])
628	0	30	if ($data =~ m[^\#\!\t\/bin\/gawk])
631	0	30	if ($data =~ m[^\#\!\/usr\/bin\/gawk])
634	0	30	if ($data =~ m[^\#\!\ \/usr\/bin\/gawk])
637	0	30	if ($data =~ m[^\#\!\t\/usr\/bin\/gawk])
640	0	30	if ($data =~ m[^\#\!\/usr\/local\/bin\/gawk])
643	0	30	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/gawk])
646	0	30	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/gawk])
649	0	30	if ($data =~ m[^\#\!\/bin\/awk])
652	0	30	if ($data =~ m[^\#\!\ \/bin\/awk])
655	0	30	if ($data =~ m[^\#\!\t\/bin\/awk])
658	0	30	if ($data =~ m[^\#\!\/usr\/bin\/awk])
661	0	30	if ($data =~ m[^\#\!\ \/usr\/bin\/awk])
664	0	30	if ($data =~ m[^\#\!\t\/usr\/bin\/awk])
667	0	30	if ($data =~ /^BEGIN/)
670	0	30	if ($data =~ m[^\#\!\/bin\/perl])
673	0	30	if ($data =~ m[^\#\!\ \/bin\/perl])
676	0	30	if ($data =~ m[^\#\!\t\/bin\/perl])
679	0	30	if ($data =~ m[^eval\ \"exec\ \/bin\/perl])
682	3	27	if ($data =~ m[^\#\!\/usr\/bin\/perl])
685	0	27	if ($data =~ m[^\#\!\ \/usr\/bin\/perl])
688	0	27	if ($data =~ m[^\#\!\t\/usr\/bin\/perl])
691	0	27	if ($data =~ m[^eval\ \"exec\ \/usr\/bin\/perl])
694	0	27	if ($data =~ m[^\#\!\/usr\/local\/bin\/perl])
697	0	27	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/perl])
700	0	27	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/perl])
703	0	27	if ($data =~ m[^eval\ \"exec\ \/usr\/local\/bin\/perl])
706	0	27	if ($data =~ m[^\#\!\/bin\/rc])
709	0	27	if ($data =~ m[^\#\!\ \/bin\/rc])
712	0	27	if ($data =~ m[^\#\!\t\/bin\/rc])
715	0	27	if ($data =~ m[^\#\!\/bin\/bash])
718	0	27	if ($data =~ m[^\#\!\ \/bin\/bash])
721	0	27	if ($data =~ m[^\#\!\t\/bin\/bash])
724	0	27	if ($data =~ m[^\#\!\/usr\/local\/bin\/bash])
727	0	27	if ($data =~ m[^\#\!\ \/usr\/local\/bin\/bash])
730	0	27	if ($data =~ m[^\#\!\t\/usr\/local\/bin\/bash])
733	0	27	if ($data =~ m[^\#\!\ \/])
736	0	27	if ($data =~ m[^\#\!\t\/])
739	0	27	if ($data =~ m[^\#\!\/])
742	0	27	if ($data =~ /^\#\!\ /)
745	0	27	if ($data =~ /^\037\235/)
748	3	24	if ($data =~ /^\037\213/)
751	0	24	if ($data =~ /^\037\036/)
754	0	24	if ($data =~ /^\377\037/)
757	3	21	if ($data =~ /^BZh/)
760	0	21	if ($data =~ /^\037\237/)
763	0	21	if ($data =~ /^\037\236/)
766	0	21	if ($data =~ /^\037\240/)
769	0	21	if ($data =~ /^BZ/)
772	0	21	if ($data =~ /^\x89\x4c\x5a\x4f\x00\x0d\x0a\x1a\x0a/)
775	21	0	if (length $data > 0)
777	0	21	if ("\cA\cRW" eq $substr)
781	21	0	if (length $data > 0)
783	0	21	if ("\cSW\232\316" eq $substr)
787	0	21	if ($data =~ /^GDBM/)
790	21	0	if (length $data > 0)
792	0	21	if ("\cF\cUa" eq $substr)
796	21	0	if (length $data > 0)
798	0	21	if ("\cE1b" eq $substr)
802	0	21	if ($data =~ /^\=\\n\
805	0	21	if ($data =~ /^diff\ /)
808	0	21	if ($data =~ /^\*\*\*\ /)
811	0	21	if ($data =~ /^Only\ in\ /)
814	0	21	if ($data =~ /^Common\ subdirectories\:\ /)
817	0	21	if ($data =~ /^\!\\n________64E/)
820	0	21	if ($data =~ /^\377\377\177/)
823	0	21	if ($data =~ /^\377\377\174/)
826	0	21	if ($data =~ /^\377\377\176/)
829	0	21	if ($data =~ /^\033c\033/)
832	0	21	if ($data =~ /^\!\\!\n/)
835	0	21	if ($data =~ /^\177ELF/)
838	0	21	if ($data =~ /^\366\366\366\366/)
841	15	6	if (length $data > 508)
843	0	15	if ("\332\276" eq $substr)
847	0	21	if ($data =~ /^\-rom1fs\-\0/)
850	15	6	if (length $data > 395)
852	0	15	if (defined $substr and $substr =~ m[^OS\/2])
856	0	21	if ($data =~ /^FONT/)
859	0	21	if ($data =~ /^\%\!PS\-AdobeFont\-1\.0/)
862	21	0	if (length $data > 6)
864	0	21	if (defined $substr and $substr =~ /^\%\!PS\-AdobeFont\-1\.0/)
868	0	21	if ($data =~ /^STARTFONT\040/)
871	0	21	if ($data =~ /^\001fcp/)
874	0	21	if ($data =~ /^D1\.0\015/)
877	0	21	if ($data =~ /^flf/)
880	0	21	if ($data =~ /^flc/)
883	21	0	if (length $data > 0)
885	0	21	if ("\cT\cBY\cY" eq $substr)
889	21	0	if (length $data > 0)
891	0	21	if ("\377FON" eq $substr)
895	21	0	if (length $data > 7)
897	0	21	if ("\000EGA" eq $substr)
901	21	0	if (length $data > 7)
903	0	21	if ("\000VID" eq $substr)
907	6	15	if (length $data > 4098)
909	0	6	if (defined $substr and $substr =~ /^DOSFONT/)
913	0	21	if ($data =~ /^\
916	0	21	if ($data =~ /^\
919	0	21	if ($data =~ /^\
922	0	21	if ($data =~ /^\
925	0	21	if ($data =~ /^\
928	0	21	if ($data =~ /^\
931	0	21	if ($data =~ /^\
934	21	0	if (length $data > 7)
936	0	21	if (defined $substr and $substr =~ /^\357\020\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0/)
940	0	21	if ($data =~ /^GIMP\ Gradient/)
943	0	21	if ($data =~ /^gimp\ xcf/)
946	21	0	if (length $data > 20)
948	0	21	if (defined $substr and $substr =~ /^GPAT/)
952	21	0	if (length $data > 20)
954	0	21	if (defined $substr and $substr =~ /^GIMP/)
958	0	21	if ($data =~ /^\336\224\225/)
961	0	21	if ($data =~ /^\2254\22\336/)
964	0	21	if ($data =~ /^\000\001\000\000\000/)
967	21	0	if (length $data > 0)
969	0	21	if ("\cB\cP\cA\cF" eq $substr)
973	21	0	if (length $data > 0)
975	0	21	if ("\cB\cP\cA\a" eq $substr)
979	21	0	if (length $data > 0)
981	0	21	if ("\cB\cP\cA\cH" eq $substr)
985	21	0	if (length $data > 0)
987	0	21	if ("\cB\cP\cA\cK" eq $substr)
991	21	0	if (length $data > 0)
993	0	21	if ("\cB\cP\cA\cN" eq $substr)
997	21	0	if (length $data > 0)
999	0	21	if ("\cB\cP\cA\r" eq $substr)
1003	21	0	if (length $data > 0)
1005	0	21	if ("\cB\cT\cA\cF" eq $substr)
1009	21	0	if (length $data > 0)
1011	0	21	if ("\cB\cT\cA\a" eq $substr)
1015	21	0	if (length $data > 0)
1017	0	21	if ("\cB\cT\cA\cH" eq $substr)
1021	21	0	if (length $data > 0)
1023	0	21	if ("\cB\cT\cA\cK" eq $substr)
1027	21	0	if (length $data > 0)
1029	0	21	if ("\cB\cT\cA\cN" eq $substr)
1033	21	0	if (length $data > 0)
1035	0	21	if ("\cB\cT\cA\r" eq $substr)
1039	21	0	if (length $data > 0)
1041	0	21	if ("\cB\cK\cA\cF" eq $substr)
1045	21	0	if (length $data > 0)
1047	0	21	if ("\cB\cK\cA\a" eq $substr)
1051	21	0	if (length $data > 0)
1053	0	21	if ("\cB\cK\cA\cH" eq $substr)
1057	21	0	if (length $data > 0)
1059	0	21	if ("\cB\cK\cA\cK" eq $substr)
1063	21	0	if (length $data > 0)
1065	0	21	if ("\cB\cK\cA\cN" eq $substr)
1069	21	0	if (length $data > 0)
1071	0	21	if ("\cB\cK\cA\r" eq $substr)
1075	21	0	if (length $data > 0)
1077	0	21	if ('!
1081	21	0	if (length $data > 0)
1083	0	21	if ("\cB\f\cA\cH" eq $substr)
1087	21	0	if (length $data > 0)
1089	0	21	if ("\cB\f\cA\a" eq $substr)
1093	21	0	if (length $data > 0)
1095	0	21	if ("\cB\f\cA\cK" eq $substr)
1099	21	0	if (length $data > 0)
1101	0	21	if ("\cB\f\cA\cF" eq $substr)
1105	21	0	if (length $data > 0)
1107	0	21	if ("\cB\n\cA\cH" eq $substr)
1111	21	0	if (length $data > 0)
1113	0	21	if ("\cB\n\cA\a" eq $substr)
1117	21	0	if (length $data > 0)
1119	0	21	if ("\cB\f\cA\cN" eq $substr)
1123	21	0	if (length $data > 0)
1125	0	21	if ("\cB\f\cA\r" eq $substr)
1129	0	21	if ($data =~ /^Bitmapfile/)
1132	0	21	if ($data =~ /^IMGfile/)
1135	0	21	if ($data =~ /^msgcat01/)
1138	0	21	if ($data =~ /^HPHP48\-/)
1141	0	21	if ($data =~ /^\%\%HP\:/)
1144	21	0	if (length $data > 0)
1146	0	21	if ("\cA\337" eq $substr)
1150	21	0	if (length $data > 0)
1152	0	21	if ("\cA\cD" eq $substr)
1156	21	0	if (length $data > 0)
1158	0	21	if ("\cA\cE" eq $substr)
1162	21	0	if (length $data > 0)
1164	0	21	if ("\376\cD" eq $substr)
1168	0	21	if ($data =~ /^0xabcdef/)
1171	21	0	if (length $data > 0)
1173	0	21	if ("\000\000\cA\371" eq $substr)
1177	0	21	if ($data =~ /^\/)
1180	0	21	if ($data =~ /^FORM/)
1183	0	21	if ($data =~ /^P1/)
1186	0	21	if ($data =~ /^P2/)
1189	0	21	if ($data =~ /^P3/)
1192	0	21	if ($data =~ /^P4/)
1195	0	21	if ($data =~ /^P5/)
1198	0	21	if ($data =~ /^P6/)
1201	0	21	if ($data =~ /^IIN1/)
1204	0	21	if ($data =~ /^MM\x00\x2a/)
1207	3	18	if ($data =~ /^II\x2a\x00/)
1210	3	15	if ($data =~ /^\x89PNG/)
1213	15	0	if (length $data > 1)
1215	0	15	if (defined $substr and $substr =~ /^PNG/)
1219	3	12	if ($data =~ /^GIF8/)
1222	0	12	if ($data =~ /^\361\0\100\273/)
1225	12	0	if (length $data > 0)
1227	3	9	if ("\377\330" eq $substr)
1231	0	9	if ($data =~ /^hsi1/)
1234	3	6	if ($data =~ /^BM/)
1237	0	6	if ($data =~ /^IC/)
1240	6	0	if (length $data > 0)
1242	0	6	if ("Y\246j\225" eq $substr)
1246	3	3	if (length $data > 2048)
1248	0	3	if (defined $substr and $substr =~ /^PCD_IPI/)
1252	0	6	if ($data =~ /^PCD_OPA/)
1255	0	6	if ($data =~ /^\007\001\000/)
1258	0	6	if (length $data > 4086)
1260	0	0	if (defined $substr and $substr =~ /^SWAP\-SPACE/)
1264	0	6	if ($data =~ /^\;\;/)
1267	0	6	if ($data =~ /^FFIL/)
1270	6	0	if (length $data > 65)
1272	0	6	if (defined $substr and $substr =~ /^FFIL/)
1276	0	6	if ($data =~ /^LWFN/)
1279	6	0	if (length $data > 65)
1281	0	6	if (defined $substr and $substr =~ /^LWFN/)
1285	0	6	if ($data =~ /^Return\-Path\:/)
1288	0	6	if ($data =~ /^Path\:/)
1291	0	6	if ($data =~ /^Xref\:/)
1294	0	6	if ($data =~ /^From\:/)
1297	0	6	if ($data =~ /^Article/)
1300	0	6	if ($data =~ /^BABYL/)
1303	0	6	if ($data =~ /^Received\:/)
1306	0	6	if ($data =~ /^MZ/)
1309	3	3	if (length $data > 2080)
1311	0	3	if (defined $substr and $substr =~ /^Microsoft\ Word\ 6\.0\ Document/)
1315	3	3	if (length $data > 2080)
1317	0	3	if (defined $substr and $substr =~ /^Documento\ Microsoft\ Word\ 6/)
1321	3	3	if (length $data > 2112)
1323	0	3	if (defined $substr and $substr =~ /^MSWordDoc/)
1327	6	0	if (length $data > 0)
1329	0	6	if ("1\276\000\000" eq $substr)
1333	0	6	if ($data =~ /^PO\^Q\`/)
1336	3	3	if (length $data > 2080)
1338	0	3	if (defined $substr and $substr =~ /^Microsoft\ Excel\ 5\.0\ Worksheet/)
1342	3	3	if (length $data > 2114)
1344	0	3	if (defined $substr and $substr =~ /^Biff5/)
1348	0	6	if ($data =~ /^\x31\xbe\x00\x00/)
1351	0	6	if ($data =~ /^PO\^Q\`/)
1354	6	0	if (length $data > 1)
1356	0	6	if (defined $substr and $substr =~ /^WPC/)
1360	0	6	if ($data =~ /^StartFontMetrics/)
1363	0	6	if ($data =~ /^StartFont/)
1366	6	0	if (length $data > 0)
1368	0	6	if ("\cSz)D" eq $substr)
1372	6	0	if (length $data > 0)
1374	0	6	if ("\cSz)G" eq $substr)
1378	6	0	if (length $data > 0)
1380	0	6	if ("\cSz)P" eq $substr)
1384	6	0	if (length $data > 0)
1386	0	6	if ("\cSz)Q" eq $substr)
1390	6	0	if (length $data > 8)
1392	0	6	if ("\cSz+E" eq $substr)
1396	6	0	if (length $data > 8)
1398	0	6	if ("\cSz+H" eq $substr)
1402	6	0	if (length $data > 0)
1404	0	6	if ("\207\315" eq $substr)
1408	6	0	if (length $data > 0)
1410	0	6	if ("J\374" eq $substr)
1414	3	3	if ($data =~ /^\%PDF\-/)
1417	0	3	if ($data =~ /^\%\!/)
1420	0	3	if ($data =~ /^\004\%\!/)
1423	0	3	if ($data =~ /^\033E\033/)
1426	3	0	if ($data =~ /^\<\!DOCTYPE\ HTML/)
1429	0	0	if ($data =~ /^\<\!doctype\ html/)
1432	0	0	if ($data =~ /^\
1435	0	0	if ($data =~ /^\
1438	0	0	if ($data =~ /^\