CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
INDEX
Search Posts SEARCH
POSTS
Who's Online WHO'S
ONLINE
Log in LOG
IN

Home: Need a Custom or Prewritten Perl Program?: I need a program that...: Re: [srenin] [Edit .CSV file] Add column: Edit Log



Zhris
Enthusiast

Nov 9, 2010, 8:21 PM


Views: 1928
Re: [srenin] [Edit .CSV file] Add column

Hi,

Ah, I expected File::Basename to have split the filename from extension.

Replace:

Code
my ($filename, $filepath, $filesuffix) = fileparse($file);


With:

Code
my $filename = $file;  
$filename =~ s/\.[^.]*$//;


Which uses a regular expression instead.

Chris


(This post was edited by Zhris on Nov 9, 2010, 8:22 PM)


Edit Log:
Post edited by Zhris (Enthusiast) on Nov 9, 2010, 8:22 PM


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives