>while (<>) {
> if ( /^#/ ){
> print;
> }
>}
This will include the "#" which the original poster does not want.
>-----Original Message-----
>From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
>Sent: Thursday, September 12, 2002 3:12 PM
>To: [EMAIL PROTECTED];
>[EMAIL PROTECTED];
>[EMAIL PROTECTED]
>Subject: A regular expression question
>
>
>I have a cron file which the line looks like this:
>
>00 22 * * * perl -S queue_submit.pl esd-foundry "perl -S host-scrubber.pl"
>#build host scrubber
>30 22 * * * perl -S queue_submit.pl esd-foundry "perl -S group-scrubber.pl"
>#build group scrubber
>30 22 * * * perl -S queue_submit.pl esd-foundry "perl -S object-scrubber.pl"
>#build object scrubber
>
>I want to get the comment after # of each line(not including "#"), how could
>I do this?
>
>Thanks a lot in advance!
>
>Lixin
>_______________________________________________
>Perl-Win32-Admin mailing list
>[EMAIL PROTECTED]
>To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>---
>Incoming mail is certified Virus Free.
>Checked by AVG anti-virus system (http://www.grisoft.com).
>Version: 6.0.386 / Virus Database: 218 - Release Date: 9/9/2002
>
>_______________________________________________
>Perl-Win32-Admin mailing list
>[EMAIL PROTECTED]
>To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs