(my $new_string = $old_string) =~ s/#ifdef SCCS_USED.*?#endif//gsm;
Have you tried something like this?
Shawn
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of North,
> Wesley J
> Sent: Wednesday, March 21, 2001 3:34 PM
> To: '[EMAIL PROTECTED]'
> Subject: Removing Text
> Importance: High
>
>
> Group,
>
> I've been tasked with removing text from files that have been under
> SCCS source control. Basically I need to find the following entry
> and remove
> it:
>
> #ifdef SCCS_USED
> static char SccsId[] = ......(etc)
> #endif
>
> this is basically SCCS keyword expansion...or ident. So I obtained a borne
> shell script and have been trying to get it to work...but it doesn't. What
> is the fastest most effective way of removing these lines of code? I guess
> through sed I can find all entries contained inside the #'s right? But for
> some reason I get lost and the script fails when I try to remove all those
> lines. Any and all help/suggestions are most welcome. Thanks.
>
>
> -Wes
>
> _______________________________________________
> ActivePerl mailing list
> [EMAIL PROTECTED]
> http://listserv.ActiveState.com/mailman/listinfo/activeperl
>
>
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
