I'm trying to filter on the first character after the eighth tab but I'm
matching this line and don't know why:
[EMAIL PROTECTED]:/var/www/centernet/htdocs/ldap_auth$ perl -ne 'print if
/^(.*?\t){8}T/' /tmp/PeopleFinderData.txt |cat -vet
397^IRxxxxx^ITxxx^IT^I^ITTR^Itrxxxxx^IProgram officer
[EMAIL PROTECTED]
[EMAIL PROTECTED]:/var/www/centernet/htdocs/ldap_auth$

I piped it through 'cat -vet' so the tabs show up clearly as '^I's. This
line shouldn't match, because the first character after the eighth tab
is an A and not a T. I used non-greedy matching of the .*?, so I thought
it would work properly. Would anyone explain to me why it's not working
the way I thought it should? I'd also welcome suggestions of better ways
to write this code.

Thanks for your suggestions.

-Kevin

Kevin Zembower
Internet Services Group manager
Center for Communication Programs
Bloomberg School of Public Health
Johns Hopkins University
111 Market Place, Suite 310
Baltimore, Maryland  21202
410-659-6139 

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to