Perl help for file handling

Applications Programming
1

$# some text
$$ some text
$@ some text
$$. some text

Mg1 some text
Mg2 some text
.
.
.
Mg10 some text

The above 10 lines are to be extracted except the lines starting from $#,$$.,...

2

DELETED

3

can some 1 explain the above line

4

cat + perl + sed = WOW !!!

---------- Post updated at 02:06 PM ---------- Previous update was at 02:00 PM ----------

perl -wln -e 'print if (!/^\$/ and /^MG/)' FILE.txt

With perl coming into picture, sed/grep/awk should make way for it.

Thanks and Regards,
Gaurav.

5

what about the grep command ?

 
grep "^Mg" filename

grep -v "^\$" filename

I didnt notice the post says "Perl help for file handling"