in reply to Re: Re: Re: Parse out the extension of a filename - return base of filename.
in thread Parse out the extension of a filename - return base of filename.

I can't find the nodes that I read where it is suggested to not use those functions. I promise I read those suggestions, though, which is the only reason why I didn't use those functions.

Im not sure what data you are talking about that prints to the screen. I don't get any such data, just the return from the function if I print it.

I see your point as far as my "solution" (heh, gotta quote it since you are right) is concerned. I need to go back to the drawing board.

I asked for comments, I got comments. I feel like I gotta flogging, though. :)

_ _ _ _ _ _ _ _ _ _
- Jim
Insert clever comment here...

  • Comment on Re: Re: Re: Re: Parse out the extension of a filename - return base of filename.

Replies are listed 'Best First'.
Re: Re: Re: Re: Re: Parse out the extension of a filename - return base of filename.
by Juerd (Abbot) on Mar 13, 2002 at 14:50 UTC

    Im not sure what data you are talking about that prints to the screen. I don't get any such data, just the return from the function if I print it.

    Here's a part of your original post, before you updated it and removed the print statements: 

        print "\n-----------\n";
    print "There are ". scalar @pieces .
          " elements in \@pieces from ".
          "filename: $file\n";

    my $c      = 0;

    for ( @pieces ) {
        print "element ", ++$c, ": $_\n";
    }
    print "-----------\n";

    [download]
    In case your memory has failed you. 

    U28geW91IGNhbiBhbGwgcm90MTMgY
W5kIHBhY2soKS4gQnV0IGRvIHlvdS
ByZWNvZ25pc2UgQmFzZTY0IHdoZW4
geW91IHNlZSBpdD8gIC0tIEp1ZXJk

[reply]
[d/l]

In Section Cool Uses for Perl