Hi all,
I seem to be having a problem separating variables with whitespace. I
though I had a field delimited file, so I just counted the field widths and
used the script below to strip off the white space on the variables I needed
evaluate. I did try to use the \w escape character, I might have been using
in the wrong context...below is my pitiful script to strip off white space,
I am pretty sure there is a quick an easy and more reliable way to do this.
Any input is appreciated...
--Rob
$i=0;
$chrs = $serv;
while ($chrs =~ /[a-zA-z0-9\.\-]/)
{
$chrs = substr($serv,$i,1);
$i= $i+1;
}
$i=$i-1;
$serv = substr($serv,0,$i);
$i=0;
$chrs = $status;
while ($chrs =~ /[a-zA-z0-9\.\-]/)
{
$chrs = substr($status,$i,1);
$i= $i+1;
}
$i=$i-1;
$status = substr($status,0,$i);
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web
