Re^2: dir / file split

I have incorporated all suggestions, including the symlink check:

        $file_path =~ /(.*)\/([^\/]+?$)/;
        my ($dir, $file) = ($1, $2);
[download]

MANY THANKS to all

Comment on Re^2: dir / file split Download Code

Replies are listed 'Best First'.
Re^3: dir / file split by johngg (Canon) on Sep 28, 2007 at 15:20 UTC
I have incorporated all suggestions Except the different delimiter :)	[reply]
Re^4: dir / file split by camelcom (Sexton) on Sep 28, 2007 at 15:55 UTC
now: `$file_path =~ m{(.*)/([^/]+?$)}; my ($dir, $file) = ($1, $2);` [download] Thanks John	[reply] [d/l]