in reply to working with files
perl -ne '/^@/ && print' infile > outfile [download]
Use " insead of ' on Win32
cheers
tachyon