Description:
The Perl language in general.
|
|
|
Simple problem with Email::Address
|
| |
I'm trying to parse an email address and I can't seem to get Email::Address to work quite. ...use strict; use warnings ; use Email::Address ; my $addr = "My Name <myname\@verizon.net>\n" ; my @addrs = Email::Address::parse($addr) ; warn scalar(@addrs) ; Gets me "0" -- it appears not to parse that string, which certainly looks... more »
|
|
|
FAQ 4.50 How do I select a random element from an array?
|
| |
This is an excerpt from the latest version perlfaq4.pod, which comes with the standard Perl distribution. These postings aim to reduce the number of repeated questions as well as allow the community to review and update the answers. The latest version of the complete perlfaq is at [link] .... more »
|
|
|
initialize object permanently (only once)
|
| |
Hello, I am using Wordnet::QueryData which allow access to a very huge dictionary data. The initialization of object my $wn = WordNet::QueryData->new; took 2 wallclock secs ( 2.36 usr + 0.07 sys = 2.43 CPU) Then the subsequent request for the data is exetremely fast For the lines below took 0 wallclock secs ( 0.00 usr + 0.00 sys = 0.00 CPU)... more »
|
|
|
write 10 files
|
| |
The following codes are not accepted by Perl and even string concatenation doesn't work. Any suggestions? ...$infile = $ARGV[0]; foreach $k (0..10) { $outfile = $infile . $k; open (OFP$k, ">$outfile"); ...$i = $size/10000; print OFP$i "something"; #0-10k, 10-20k, .... 90-100k...
|
|
|
FAQ 4.52 How do I sort an array by (anything)?
|
| |
This is an excerpt from the latest version perlfaq4.pod, which comes with the standard Perl distribution. These postings aim to reduce the number of repeated questions as well as allow the community to review and update the answers. The latest version of the complete perlfaq is at [link] .... more »
|
|
|
FAQ 4.35 How do I find the soundex value of a string?
|
| |
This is an excerpt from the latest version perlfaq4.pod, which comes with the standard Perl distribution. These postings aim to reduce the number of repeated questions as well as allow the community to review and update the answers. The latest version of the complete perlfaq is at [link] .... more »
|
|
|
Permissions on a file
|
| |
I create a text file on the server remote.txt ok with the following code (the last part of it) $first_name = $FORM{command1}; $last_name = $FORM{command2}; open (example, ">remote.txt") || die ("Could not open file. $!"); print example "$first_name\n$last_name\n"; close (example); print "Content-type:text/html\r\n\r\ n";... more »
|
|
|
Need ideas on how to make this code faster than a speeding turtle
|
| |
I 'll eventually have the input file filled with 350 million items. Right now there is only one $more input 3308191 The following program reads in the number from the file named 'input' and builds a url form this number. Then it builds a url from this number. I have lynx then dump the data into a file called 'out' and... more »
|
|
|
