> not elegant but this should work:
> $res[0] = substr($data, 0, 3);
> $res[1] = substr($data, 3);

substr() is zero based so to get the third character to the end of the line
you'll have to start at position 2:

 $res[1] = substr($data, 2);

_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Reply via email to