On Thu, 21 Jun 2001, Jeanne Riley wrote:
> I am attempting to write my 1st Perl script. I have an install of ClearCase
> 4.1 which has Perl embedded in it. I need to write a Perl script (trigger)
> that if anyone attempts to check in a file with NT eol character the check
> in will be blocked. The Perl script needs to detect if there are any NT eol
> or ^M characters in a file. I am "cat" the file and know I need to grep for
> ^M but I don't know how to do this in Perl. I did seek assistance from
> www.perl.org and found information regarding "\cI<M>" but this does not seem
> to work.
>
> Has anyone tried to do this before?
you want to match your string against /\cM/g. In fact, instead of
blocking the file, you should just filter them out with this regular
expression substitution:
$string =~ s/\Cm//g
-- Brett
http://www.chapelperilous.net/btfwk/
------------------------------------------------------------------------
sillema sillema nika su
