I am writing a program which will print variety of matches having keywords like insert,delete etc from another file .For this I wrote a couple of sub routines one of which returns an array(having the comments removed ).Then I face the problem :
A part of that array is :
CURSOR c_efc(l_worker_id IN NUMBER)
insert into awk_losers(
l_total_workers IN NUMBER,
l_pk1 IN NUMBER,
l_bg IN NUMBER) IS
SELECT * from dual;
insert
into awk_managers (aba.rowid,
aba.absence_attendance_id,
aba.abs_information15,
aba.abs_information9,
aba.abs_information11,And I want to get the two tablenames (awk_managers and awk_losers) .So I am using this :
sub find {
my $pcount =0;
foreach $line(@array){
if ($line =~/insert(.*)into/gi){
print "$'\n";
}else {
$pcount++
}
}
}It so happens that I get awk_losers but not awk_managers.It seems that multiple line matching is not happening.Is this because I am inputting an array? Can anyone guide me in the correct direction...Also whats the best methhod for matching multiple lines which may have any space or tab or newline in between them ?
Thanx Mark
___________________________________________________ Click below to experience Sooraj R Barjatya's latest offering 'Main Prem Ki Diwani Hoon' starring Hrithik, Abhishek & Kareena http://www.mpkdh.com
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
