Hi
I want to search for columns start_dt and end_dt in all my tables ,wrote shell sript to find the list of tables .I am new to perl want to do it same in perl.Any help it would be appericiated
[code=perl]
for name in `cat list.txt`
do
tabname=`awk /CREATE TABLE /{table=$2; start=0; }
/START_DT/ { start++ }
/END_DT/ && start { print table }' "$name.sql" `
echo $tabname
done
[/code]
Thanks,
MR
I want to search for columns start_dt and end_dt in all my tables ,wrote shell sript to find the list of tables .I am new to perl want to do it same in perl.Any help it would be appericiated
[code=perl]
for name in `cat list.txt`
do
tabname=`awk /CREATE TABLE /{table=$2; start=0; }
/START_DT/ { start++ }
/END_DT/ && start { print table }' "$name.sql" `
echo $tabname
done
[/code]
Thanks,
MR
Comment