Hello .
Would really like to know why this code fails . I need to edit both the QUESNO : and <\p> tag at the same time .
open(TEXT, "<20030211.txt") || die ("Cannot open the text files");
while (<TEXT>) {
if ($_ =~ m/QUESNO :/) {
if ($_ =~ m/<\/p>/) {
print \($_\);
\}
\}
\}
Here is a sample of text file.
QUESTYPE: QUESTIONS FOR WRITTEN ANSWER
QUESTI : Written Question
QUESNO : 1
YEAR : 2003
QUESWRITTEN: 13 February 2003
QUESSP : Dr Muriel Newman
REPLYSP : Hon Steve Maharey
QUESTION:
QUESTION :
Dr Muriel Newman
to the Minister of Social Services and Employment
:
Is he and/or the Ministry of Social Development considering a welfare
reform initiative entitled New Directions; if so, what are the details
of this initiative,;if not, what are the details of any new welfare
reform initiatives, if any, that he or the Ministry are considering?
<p>
ANSWER :
Hon Steve Maharey
(Minister of Social Services and Employment)
replied:
New Directions is a Department of Child, Youth and Family Services programme, announced in 2001.
</p>
Thank You in advance.
Whatsup.