in reply to Regular Expression

@found{/(-D\S*)/g} = ();
print "$_\n" for( sort keys %found );

[download]

Replies are listed 'Best First'.
Re: Re: Regular Expression
by ashok (Sexton) on Jan 15, 2001 at 09:18 UTC
    Great , it works for me. Thanks for your help.
[reply]

In Section Seekers of Perl Wisdom