Skip Menu |

This queue is for tickets about the File-Type CPAN distribution.

Report information
The Basics
Id: 32473
Status: new
Priority: 0/
Queue: File-Type

People
Owner: Nobody in particular
Requestors: balak.deshaw [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: (no value)
Fixed in: (no value)



Hi, method 'checktype_contents' is missing to check for one pattern to find 'text/html' file type. method 'checktype_contents' checks for the following pattern match with data. if ($data =~ m[^\<\!DOCTYPE\ HTML]) { return q{text/html}; } if ($data =~ m[^\<\!doctype\ html]) { return q{text/html}; } if ($data =~ m[^\<HEAD]) { return q{text/html}; } if ($data =~ m[^\<head]) { return q{text/html}; } if ($data =~ m[^\<TITLE]) { return q{text/html}; } if ($data =~ m[^\<title]) { return q{text/html}; } if ($data =~ m[^\<html]) { return q{text/html}; } if ($data =~ m[^\<HTML]) { return q{text/html}; } which is missing the below mentioned pattern $data =~ m[^\<\!DOCTYPE\ html] some html file has the above mentioned pattern .can you please add this pattern . I have attached the html file which has above mentioned format for your reference. Thanks, Balamurugan krishnam
Subject: ch.html

Message body is not shown because it is too large.

Subject: add pattern to find 'text/html'
From: balak.deshaw [...] gmail.com
added subject name On Mon Jan 21 06:06:35 2008, krishnam wrote: Show quoted text
> Hi, > > method 'checktype_contents' is missing to check for one pattern to find > 'text/html' file type. method 'checktype_contents' checks for the > following pattern match with data. > > if ($data =~ m[^\<\!DOCTYPE\ HTML]) { > return q{text/html}; > } > if ($data =~ m[^\<\!doctype\ html]) { > return q{text/html}; > } > if ($data =~ m[^\<HEAD]) { > return q{text/html}; > } > if ($data =~ m[^\<head]) { > return q{text/html}; > } > if ($data =~ m[^\<TITLE]) { > return q{text/html}; > } > if ($data =~ m[^\<title]) { > return q{text/html}; > } > if ($data =~ m[^\<html]) { > return q{text/html}; > } > if ($data =~ m[^\<HTML]) { > return q{text/html}; > } > > which is missing the below mentioned pattern > $data =~ m[^\<\!DOCTYPE\ html] > > some html file has the above mentioned pattern .can you please add this > pattern . > > I have attached the html file which has above mentioned format for your > reference. > > Thanks, > Balamurugan krishnam
Subject: Re: [rt.cpan.org #32473] AutoReply:
Date: Mon, 21 Jan 2008 16:48:25 +0530
To: bug-File-Type [...] rt.cpan.org
From: "bala murugan" <balak.deshaw [...] gmail.com>
*subject name : add pattern to find 'text/html'* On Jan 21, 2008 4:36 PM, Bugs in File-Type via RT <bug-File-Type@rt.cpan.org> wrote: Show quoted text
> > Greetings, > > This message has been automatically generated in response to the > creation of a trouble ticket regarding: > "", > a summary of which appears below. > > There is no need to reply to this message right now. Your ticket has been > assigned an ID of [rt.cpan.org #32473]. Your ticket is accessible > on the web at: > > http://rt.cpan.org/Ticket/Display.html?id=32473 > > Please include the string: > > [rt.cpan.org #32473] > > in the subject line of all future correspondence about this issue. To do > so, > you may reply to this message. > > Thank you, > bug-File-Type@rt.cpan.org > > ------------------------------------------------------------------------- > Hi, > > method 'checktype_contents' is missing to check for one pattern to find > 'text/html' file type. method 'checktype_contents' checks for the > following pattern match with data. > > if ($data =~ m[^\<\!DOCTYPE\ HTML]) { > return q{text/html}; > } > if ($data =~ m[^\<\!doctype\ html]) { > return q{text/html}; > } > if ($data =~ m[^\<HEAD]) { > return q{text/html}; > } > if ($data =~ m[^\<head]) { > return q{text/html}; > } > if ($data =~ m[^\<TITLE]) { > return q{text/html}; > } > if ($data =~ m[^\<title]) { > return q{text/html}; > } > if ($data =~ m[^\<html]) { > return q{text/html}; > } > if ($data =~ m[^\<HTML]) { > return q{text/html}; > } > > which is missing the below mentioned pattern > $data =~ m[^\<\!DOCTYPE\ html] > > some html file has the above mentioned pattern .can you please add this > pattern . > > I have attached the html file which has above mentioned format for your > reference. > > Thanks, > Balamurugan krishnam >