You are here:
Any question relating to Perl including its internals, data structures, speed, memory usage, syntax, version changes, extra CPAN modules, code standards, code cleanup, or just silly problems.
I have been writing Perl code professionally for almost 10 years. I have modules on CPAN, have Perl code that's included in the latest versions of Redhat, Debian, etc. I have done professional Perl work for many household names including Ticketmaster, Interflora, and allbookstores.com.
Only work experience and a love of all things Perl.
| User | Date | K | C | P | Comments |
|---|---|---|---|---|---|
| Dennis Smith | 11/01/11 | 10 | 10 | 10 | Wow! |
| John | 07/27/11 | 10 | 10 | 10 | Thanks Justin. I think that will do ..... |
| Jerry | 01/22/11 | 10 | 10 | 10 | Answer was quick and correct. I asked ..... |
| Lozzy | 06/05/10 | 10 | 10 | 10 | I was very surprised at the timeliness ..... |
| Craig | 05/26/10 | 10 | 10 | 10 | When I see it written out it ..... |
Hi Dennis, Of course. This is off the top of my head, but something *like* this should work: <pre> my $dir = '/where/files/are'; my $current_file = 1; foreach my $path ( sort { $a
Hi Tom, Your regex would look something like: m{([\d/]+)\s+(.+?)\s+\$?([\d.]+)\s+([\d.]+)\s+([\d.]+)\s+([\d.]+)}; Which looks mostly like line noise. To clean it up, I might try something like:
Hi James, This isn't really a job for a regex. I'd do something like: my $filename = q{32037-JUSTIN'S}; my $new_filename = join q{-}, reverse split m{-}, $filename, 2; If you must use a
Hi Ashiht, I'm not sure I understand your question. Specifically, why you would want to do that. The point of use strict is so that you have to declare your variables with my. The short answer
Hi John, I fear the site's formatting may have completely borked what you sent me, but if you wanted all of the links that matched 'images/' you could simply do something like. open my $fh, '<'

©2012 About.com, a part of The New York Times Company. All rights reserved.