while (<>) {
       if ( /^#/ ){
                print;
        }
}

-----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-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to