[Perl-unix-users] CN=Dusan Kenic/OU=Systems/OU=Corporate/O=SunLife is out of the office.

2006-08-01 Thread Dusan . Kenic
I will be out of the office starting 08/01/2006 and will not return until 08/02/2006. On August 1 2006 I can be reached at 416 457 7180. Regards. --- This e-mail message (including attachments, if any) is intended for the u

[Perl-unix-users] CN=Dusan Kenic/OU=Systems/OU=Corporate/O=SunLife is out of the office.

2006-08-01 Thread Dusan . Kenic
I will be out of the office starting 08/01/2006 and will not return until 08/02/2006. On August 1 2006 I can be reached at 416 457 7180. Regards. --- This e-mail message (including attachments, if any) is intended for the u

Re: [Perl-unix-users] Regular expression question

2006-08-01 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Title: Regular expression question From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Cai, Lucy (L.)Sent: Monday, July 31, 2006 17:21To: Cai, Lucy (L.); perl-win32-users@listserv.ActiveState.com; perl-unix-users@listserv.ActiveState.com; [EMAIL PROTECTED]; [EMAIL PROTECTED]Sub

Re: [Perl-unix-users] Regular expression question

2006-08-01 Thread Bertrand, Jean-Marc
Title: Regular expression question Try something like:       my ($dir , $filename) = $file= ~ /^(.*?)\\([^\\]*?)$/ ;   From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of< /B>Cai, Lucy (L.)Sent: Monday, July 31, 2006 8:21 PMTo: Cai, Lucy (L.); perl-win32-users@listserv.ActiveSt

[Perl-unix-users] Regular expression question

2006-08-01 Thread Cai, Lucy \(L.\)
Title: Regular expression question I have a file such as: My $file = "c:\temp\zips\ok.txt"; How can I split the $file to get the only path: My $dir = "c:\temp\zips"; My $file = "ok.txt"; Thanks in advance! Lucy ___ Perl-Unix-Users mail

[Perl-unix-users] Regular expression question

2006-08-01 Thread Cai, Lucy \(L.\)
Title: Regular expression question I have a file such as: My $file = "c:\temp\zips\ok.txt"; How can I split the $file to get the only path: My $dir = "c:\temp\zips"; My $file = "ok.txt"; Thanks in advance! Lucy ___ Perl-Unix-Users ma