i am having an issue here, i think the bulk of it revolves around this;
print join(',', @uword{ $seen{ $key }[ 1 ] }[ 1 .. $#{ @uword{
$seen( $key ) } } ] );
however, given how that looks, i'm thinking i've got others.
so, pretty much, what i do is go through each line and take out the wo
I personally don't under #3. I would do something like:
while( my ($key, $value) = each %file2) {
print "$key,$value" if( !defined( $file1{ $key } ) );
print "$key,$file1{ $key } if( defined( $file1{ $key } ) );
}
That assumes that the keys are exact between files.
However, as I wrote this, I thi
nity it might be better to handle both input files and output to a 3rd
> work file, which can be renamed later.
>
> Also, what would be the best parms to open the necessary input files?
>
> thanks
> Brian
>
> --
> *From:* shawn wilson
> *
ell us about what you've tried (and a bit about
your headache) and we'll see what we can do.
On Mon, Nov 1, 2010 at 7:29 AM, shawn wilson wrote:
> as i said, google. i'm not taking my time to write it for you, but someone
> already has:
> http://csvdiff.sourceforge.net/
&g
ti /usr/local/lib/perl5/5.12.2
> .) at (eval 3) line 1.
>
>
> On Mon, Nov 1, 2010 at 3:08 PM, shawn wilson wrote:
>
>> It would seem that they call it perl-xml-parser. I don't know much
redhat,
>> but, yum install should work.
>>
>> That said, maybe it woul
yeah, it's one of those that you shouldn't modify or you might start seeing
unexpected results. read perlvar or google 'perl input record separator' for
more.
On Mon, Nov 1, 2010 at 10:14 AM, Matthew Young wrote:
> On Oct 31, 10:01 am, brian5432...@yahoo.co.uk (Brian) wrote:
> > Hi guys, long ti
couldn't you just do something like:
die "I said two variables\n" unless #$ARGV = 2;
?
i'm not sure what you're asking? you already check this?
On Tue, Nov 2, 2010 at 1:08 AM, Sri wrote:
> Hi - I have just started with Perl and would need your help on this.
>
> I am trying to write a program whi
-- Forwarded message --
From: "shawn wilson"
Date: Nov 2, 2010 3:12 PM
Subject: Re: checking if a file is in use
To: "perl_haxor 123"
perlmonks has a nice article on file locks in general that might be useful
to you. i assume what you want to do is lock t
i'm getting errors when trying to print these hash refs out and i just can't
figure it out. here's the function:
for my $word ( keys %data ) {
while( my ($field, $type) = each %{ $data }{ $word } ) {
print "$word,$field" if( $type eq 'field' );
while( my ($line, $type) = each %{ $da
Just for the record, it looks like you posted a slice of an array ref to
hashes. Though, arrays are ordered...
On Nov 3, 2010 5:24 AM, "Chaitanya Yanamadala"
wrote:
> Hi
> Thank you all
> I found out the solution for this..
>
>
> Regards
> Chaitanya
>
>
>
> On Wed, Nov 3, 2010 at 2:50 PM, Shlomi F
### the below lines are what are err'ing when i run the script.
if( defined( $ufield ) && !defined( $data{ $word { $ufield } } ) ) {
$data{ $word { $ufield } } = 'field';
}
}
On Wed, Nov 3, 2010 at 9:03 AM, John W. Krahn wrote:
> Sh
x27;field' );
while( my ($line, $type) = each %{ $data->{ $word } } ) {
print ",$line" if( $type eq 'line' );
}
}
}
sub definition {
my ($word, $ufield) = @_;
if( defined( $ufield ) &
its Unix, I'd use cron as its probably already running. And do something
like: script.pl $(find -type f -print0) Every few seconds. Have the
script die if ARGV[0] is undefined. I don't remember what character
'-print0' puts between files -check the man pages and split on that. Loop
through the fil
Use strict and warnings. Probably should also use parentheses:
open(CSV, "< $file")
On Nov 7, 2010 9:01 PM, "J M" wrote:
> Hi all,
>
> I'm having great issues with my program at the moment... it is supposed to
> take a csv file and parse it, with the output being stored in a MySQL
> database. The
Do an 'ls -l' and a 'whoami' and post the result. Also post the error your
program gives.
On Nov 7, 2010 9:19 PM, "J M" wrote:
> I did hardcode the name in the first version of the script... in two
forms:
> 'file.txt' and '/home/path/to/myfile/file.txt'. Neither made any
difference.
>
> Thank you
ote:
>
> On Nov 7, 2010, at 6:47 PM, shawn wilson wrote:
>
>> its Unix, I'd use cron as its probably already running. And do something
>> like: script.pl $(find -type f -print0) Every few seconds.
>
> That looks plenty straightforward enough, except how does one
gt;
> On 8 November 2010 15:46, Chap Harrison wrote:
>>
>> On Nov 7, 2010, at 6:47 PM, shawn wilson wrote:
>>
>>> its Unix, I'd use cron as its probably already running. And do something
>>> like: script.pl $(find -type f -print0) Every few seconds.
&g
On Sun, Nov 14, 2010 at 9:39 AM, vajjra 007 wrote:
> Dear fellow members,
>
> I'm developing a Perl program that can be used on Linux hosts to perform
> certain tasks. Planning to release a premium version of the program that
> will be run on servers with public IP address for a low price. How ca
so, i'm guessing that i have to mess with ARGV when i use -T on my code? i'm
getting this error:
Insecure dependency in open while running with -T switch at
/usr/lib/perl/5.10/IO/File.pm line 66
now, i didn't get this before spreadsheet::writeexcel. so i'm thinking that
i can't use ARGV when i def
On Sun, Nov 14, 2010 at 11:42 AM, Zachary Brooks
wrote:
> Hello again,
>
> Yesterday I had a question on pattern matching. A couple of people
> responded
> with very useful information. After some finagling, I got my rudimentary
> code to work. I'm a PhD student studying computational linguistics
infile );
my $workbookout = Spreadsheet::WriteExcel->new( $outfile );
On Sun, Nov 14, 2010 at 11:44 AM, shawn wilson wrote:
> so, i'm guessing that i have to mess with ARGV when i use -T on my code?
> i'm getting this error:
> Insecure dependency in open while running w
On Sun, Nov 14, 2010 at 1:53 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> sw> second, why not use a place holder like someone recommended yesterday?
> sw> something like:
> sw> s/^(.+)$/\1<\/s>/g
>
> what is a p
so, if you've got a file, do something like:
while ($line = ) {
$line =~ m/^(.+)$/ig;
print "$1<\/s>\n";
}
On Sun, Nov 14, 2010 at 1:53 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> sw> second, why not us
so, i'm thinking i'm not understanding references here again, but here's
what i have.
i fill in my array here:
my $worksheetin = $workbookin->worksheet(0);
my ( $row_min, $row_max ) = $worksheetin->row_range();
my ( $col_min, $col_max ) = $worksheetin->col_range();
for my $row ( $row_min .. $row
too much freaking data. i increased my scroll buffer and found that i do get
data, just not the last 1k lines err
On Mon, Nov 15, 2010 at 12:33 PM, shawn wilson wrote:
> so, i'm thinking i'm not understanding references here again, but here's
> what i have.
>
&
On Mon, Nov 15, 2010 at 1:54 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> sw>my $worksheetout = $workbookout->add_worksheet( '$year' );
>
> why are you quoting $year? that doesn't do what you think it does.
2010/11/19 Alexey Mishustin
>
> 11/19/2010, "Chap Harrison" вы писали:
>
> >Hi folks,
> >
> >The current version of Ubuntu Linux I'm using comes with Perl 5.10.1, but
> I want to install and develop under 5.12.2. From what I've read in
> Perlmonks and Stackoverflow, it's not difficult to instal
so, i've read data in from a spreadsheet, assign it to a 3d array and i need
to output another spreadsheet with worksheets that are named like one of the
cell of the first. however, when i do i get this:
Invalid character []:*?/\ in worksheet name: M/V AUTO ATLAS at ./
xldatesel.pl line 93
ok, fin
any of y'all write web apps in perl? what do you use? i'm using
html::template but i was thinking of going back to straight cgi.pm or having
my perl send back json for the page to render (but i'm not that familiar
with js). thoughts?
On Mon, Nov 22, 2010 at 10:59 AM, Robert Wohlfarth wrote:
> On Mon, Nov 22, 2010 at 9:02 AM, shawn wilson wrote:
>
> > any of y'all write web apps in perl? what do you use? i'm using
> > html::template but i was thinking of going back to straight cgi.pm or
> >
Well, each new ssh connection should spawn a new process so you could look
at it from that end. More technically, you could look into netstat or lsof
modules.
On Nov 23, 2010 11:31 AM, "Amit Saxena" wrote:
> Hi all,
>
> What's the best way to monitor ssh connectivity, and not just ssh port
> avail
I like net::ping. But what's the point of reinventing the wheel? There's
dozens of network monitoring suites that'll do this for you - nagios for one
should suite the purpose well enough.
Also, nmap should have a module to allow you to audit ssh. With any luck,
you might be able to access that fro
i'm messing up somewhere along the way here...
i'm trying to get data from a table in a page which should always get
defined like this:
and i'm looking for an element of the table that looks like this:
Length:
266.0m
i'm fine getting the url but i'm g
Look at find2perl.
i decided to use another module to get my data but, i'm having a bit
of an issue with xpath.
the data i want looks like this:
name
attribute
name2
attribute2
possible name3
possible attribute3
more of the same format
with this code, i'm only getting the f
On Sun, Dec 12, 2010 at 7:52 PM, Onteria wrote:
> I just finished working on a solution for the exercises provided in the
> tutorial located here:
>
> A Beginner's Introduction to Perl 5.10 - Perl.com
> http://bit.ly/dHvsqC
> (shortened to prevent cutoff)
>
> Instructions for the exercise:
> "Give
i'm trying to exclude undefined variables for that are to be put into
a sql database date field, but none of this is working:
sub correctdate { # make valid sql DATE field
my $date = $_[ 0 ];
my ($month, $day, $year) = split / /, $date if defined( $date );
$day =~ s/,//g if
On Sun, Dec 12, 2010 at 8:11 PM, shawn wilson wrote:
> i'm trying to exclude undefined variables for that are to be put into
> a sql database date field, but none of this is working:
errr, sorry, my error with the current code is:
Global symbol "$corrected" requires exp
On Mon, Dec 13, 2010 at 1:05 AM, John W. Krahn wrote:
> shawn wilson wrote:
>>
>> i'm trying to exclude undefined variables for that are to be put into
>> a sql database date field, but none of this is working:
>>
>> sub correctdate { # make valid
>
>> or the File::Find module to find files without resorting
>> to the use of separate processes and shell commands.
>
>
> Me second.
> File::Find is your friend.
>
Also, since you seem to be familiar with find use find2perl and you barely
have to lift a finger. Its like training wheels for File::
>
> I would love to know how to
> create a graphic user interface using Perl. I've read that there are a lot
> of resource to do this but I don't know where to start...
> Can anyone help me?
> I'm a Perl's beginner under Mac OS X.
Perlmonks also has some nodes on this.
Http://www.perlmonks.org/?no
On Dec 23, 2010 2:19 PM, "Chris Stinemetz" <
cstinem...@cricketcommunications.com> wrote:
>
> Hello,
>
> I hope someone can help me. I am trying to parse data from a txt file and
output the results to a new file with timestamp in the name of the file.
>
> The format of the txt file is ";" delimite
On Tue, Jan 11, 2011 at 4:57 AM, Sean Murphy wrote:
> Hi all.
>
> I have read the explaination of the Map function and it is still a mystry to
> myself on what it is for and when would you use it?
>
> All explainations I have seen in books and blogs don't make it clear.
>
my @new = map {$_} @arr;
>> that is a poor explanation IMO.
hell, i was going to give this which dereferences the reference of a
reference DBI's selectall_arrayref returns so that i can later loop
through it again and again with different parameters:
my (@groups) = map {...@$_} @{ $dbh->selectall_arrayref("select distinc
On Jan 12, 2011 12:10 PM, "Uri Guttman" wrote:
>
> > "R" == Ruud >
writes:
>
> R> On 2011-01-11 11:44, Uri Guttman wrote:
> >> these are equivilent:
> >>
> >> my @out = grep /foo/, @in ;
> >> my @out = map { /foo/ ? $_ : () } @in ;
>
> R> Indeed equivalent. There is a difference though
> subs in perl ALWAYS return something, either the value from return or
> the last evaluated expression.
What do you mean by this?
sub nothing {
my $something = 5;
if ( $something == 5) {}
}
... will return 'undef' and not 5 or anything else, right?
On Jan 13, 2011 2:24 AM, "Uri Guttman" wrote:
>
> >>>>> "sw" == shawn wilson writes:
>
> >> subs in perl ALWAYS return something, either the value from return or
> >> the last evaluated expression.
>
> sw> What do you m
On Jan 13, 2011 4:19 AM, "vasanth" wrote:
>
> Hi friends,
>
> Kindly help me regarding the issue Im facing with the below perl
> script,
>
> I have a below script which send the message to Console.
>
> I need to modify this script it send message to a Log file.
>
> Please find the below steps whic
You also might want to look into Data::Dumper to see exactly what you're
working with.
Off the top though:
map {@$_} @$arr
might be a start.
On Jan 24, 2011 12:41 AM, "sync" wrote:
>
> Hello, guys:
>
> is there any information in the MIB about the CPU-usage. I am
> monitoring Windows-machines using whatsup and the goal is to raise an
> alarm if the usage passes a certain threshold.
>
> By the way , I want to monitor them in Linux Serv
On Feb 7, 2011 2:57 AM, "stavan" wrote:
>
> On Jan 19, 7:55 pm, rob.di...@gmx.com (Rob Dixon) wrote:
> > On 19/01/2011 09:56, Sean Murphy wrote:
> >
> >
> >
> > > Hi all.
> >
> > > I am having a bad week. things are not working as they should. Grin.
> > > Fix one problem ane another pops up.
> >
>
RD> Perl has no proper boolean values. Instead, the boolean operators
RD> treat zero, undef, and the null string '' all as false. Anything else
RD> is true.
to be pedantic, '0' is also false. it isn't exactly the same as 0.
come again with that? how is:
$string = 0; #different from
$string =
i'm getting this error:
DBD::mysql::st execute failed: Column count doesn't match value count at row
1 at ./test-get.pl line 91, line 1.
DBD::mysql::st execute failed: Column count doesn't match value count at row
1 at ./test-get.pl line 91, line 1.
and i've been counting placeholders, columns,
On Feb 15, 2011 9:36 PM, "Chris Stinemetz" <
cstinem...@cricketcommunications.com> wrote:
>
> I am interested in creating a cgi perl script that I can publish on the
web that will tie into a mysql database and create a x,y axis graph based on
data selection. Any suggestions are greatly appreciated.
FYI, Spreadsheet::WriteExcel will be replaced with
Spreadsheet::WriteExcel::XLSX soon so it might be best to try to use the
later.
On Feb 7, 2011 1:47 AM, "Octavian Rasnita" wrote:
> From: "David Newman"
>>
>>
>> On 2/6/11 7:57 PM, terry peng wrote:
>>>
>>>
>>>
>>> Sun, 06 Feb 2011 18:18:09 -0800
You want quick and dirty? Figure out how the nntp module works. Then figure
out at what point your program is calling that function and with what
parameters. Then replace that function with yours. Then figure out what the
program is looking for for output and fix the output that the Net::NNTP
modul
First, use File::Find to get your info (or you could use system( ls -l ) and
split - either way). To compare your time stamps, use DateTime and do dt1 -
dt2
On Mar 2, 2011 12:16 PM, "Shawn H Corey" wrote:
>
> On 11-03-02 12:12 PM, shawn wilson wrote:
>>
>> First, use File::Find to get your info (or you could use system( ls -l )
and
>> split - either way). To compare your time stamps, use DateTime and do dt1
-
>>
On Wed, Mar 2, 2011 at 3:37 PM, Uri Guttman wrote:
> > "M" == Matt writes:
>
> 2 lines will do it:
>
> use File::Slurp ;
>
>unless( read_file( $file ) =~ /$whatever/ ) {
>
># do something
>}
>
>
> what's better about File::Slurp than just doing:
my( $file, $
On Mar 2, 2011 4:47 PM, "Uri Guttman" wrote:
>
> >>>>> "sw" == shawn wilson writes:
>
> sw> On Wed, Mar 2, 2011 at 3:37 PM, Uri Guttman
wrote:
> >> >>>>> "M" == Matt writes:
> >>
> >>
On Mar 3, 2011 6:07 AM, "Mike Blezien" wrote:
>
> Hello,
>
> I posted a question earlier about creating a PDF file from a PDF form
submission which we now have working. We are able to create the PDF file to
be attached to an email.
>
> The issue I'm having now is the ability to extract some specif
On Mar 3, 2011 6:35 AM, "Mike Blezien" wrote:
>
> - Original Message ----- From: "shawn wilson"
> Cc: "Perl List"
> Sent: Thursday, March 03, 2011 5:22 AM
> Subject: Re: Extracting Data from PDF files
>
>
>
>> On Mar 3, 2011
On Mar 5, 2011 1:54 AM, "Ramprasad Prasad" wrote:
>
> I have a web form where people sign up for updates by filling in their
email
> address
>
> A lot of users end up not receiving the confirmation mailer because of
typos
> in the email id
> Like yhaoo.com or hotmaill.com
>
> I would like to promp
On Mar 7, 2011 11:37 AM, "Brandon McCaig" wrote:
>
> On Mon, Mar 7, 2011 at 5:22 AM, Ramprasad Prasad
wrote:
> > 1) Create a hash of aliases for frequently used domains and their typos
> > For eg
> > gmaill.com => gmail.com
> > hotmal.com => hotmail.com
> > etc
> >
> > when I get the email id
On Mar 16, 2011 11:53 AM, wrote:
>
>
> if(@ARGV != 1){
>
I don't think you can look at an array like its a string like that.
Maybe string( @ARGV ) != 1 might work. But what you probably want is:
If( defined( $ARGV[ 0 ] ) )
i ran across a peace of interesting code:
my $writer = shift->(
[ 200, [ "Content-type" => "text/plain" ], $s ]
);
so, if i understand this correctly, this would be the same as
my $writer = sub {
my $a = shift;
my $thing = sub {
my $subthing = $writer->{ $a };
return [ 200, [ "Content-typ
On Fri, Mar 18, 2011 at 4:50 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> sw> i ran across a peace of interesting code:
> sw> my $writer = shift->(
> sw> [ 200, [ "Content-type" => "text/plain" ],
On Fri, Mar 18, 2011 at 4:51 PM, Shawn H Corey wrote:
> On 11-03-18 04:31 PM, shawn wilson wrote:
>
>> my $writer = shift->(
>> [ 200, [ "Content-type" => "text/plain" ], $s ]
>> );
>>
>
> shift will shift @_ in a sub and @ARGV ou
On Fri, Mar 18, 2011 at 5:23 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> please learn how to quote emails properly. it is hard to tell here what
> i replied and what you wrote.
>
> sorry, i don't know how to do any better in
On Fri, Mar 18, 2011 at 5:45 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
>
> sw> On Fri, Mar 18, 2011 at 5:23 PM, Uri Guttman
> wrote:
> >> >>>>> "sw" == shawn wilson writes:
> >> >
On Fri, Mar 18, 2011 at 6:21 PM, shawn wilson wrote:
>
>
> On Fri, Mar 18, 2011 at 5:45 PM, Uri Guttman wrote:
>
>> >>>>> "sw" == shawn wilson writes:
>>
>>
>> sw> On Fri, Mar 18, 2011 at 5:23 PM, Uri Guttman
>> wrote:
On Fri, Mar 18, 2011 at 6:36 PM, Shawn H Corey wrote:
> On 11-03-18 06:21 PM, shawn wilson wrote:
>
>> my $a = Streamer->new;
>> my $app = sub {
>> return [ 200, [ "Content-type" => "text/plain" ], $a->open_fh ];
>> }
>>
>>
On Fri, Mar 18, 2011 at 7:02 PM, Shawn H Corey wrote:
> On 11-03-18 06:41 PM, shawn wilson wrote:
>
>> an argument to what sub?
>> (it's obvious that i've missed the boat on this concept)
>>
>
> my $writer = shift->(
>[ 200, [ "Conten
thank you all. i have a much better grasp on what this means now. at least i
know why i had trouble with it - i didn't (don't) understand closures. and,
i am not used to event driven programming. the example comes from psgi which
(generally) gets an event and gives you data. i've also been looking
On Sat, Mar 19, 2011 at 10:46 PM, Uri Guttman wrote:
> >>>>> "sw" == shawn wilson writes:
>
> sw> thank you all. i have a much better grasp on what this means
> sw> now. at least i know why i had trouble with it - i didn't (don't)
&g
On Tue, Mar 22, 2011 at 1:05 PM, Geospectrum wrote:
> Hi am am setting up a small website and have set up formmail.pl to
> create a way of people asking questions.
>
> I'd like now to add a way of visitors to display a HTML page by
> entering a number (invoice number) into a HTML form and then re
On Mar 22, 2011 4:43 PM, "Randal L. Schwartz" wrote:
>
> > "Peter" == Peter Scott writes:
>
> >> my $s = Streamer->new;
> >> my $app = sub {
> >> return sub {
> >> $s->open_fh;
> >> my $writer = shift->(
> >> [ 200, [ "Content-type" => "text/plain" ], $s ]
> >> );
> >> };
> >> };
>
> Peter> A
he inner subroutine, so
>>> that *is* something that could be noted:
>>
>> Right, the superfluous naming of $writer leads to a lot of head-
>> scratching. Best guess (if this is an accurate post of the code), that
>> there was originally some debugging/logging code in t
this is pretty abstract from what i'm really doing, but i'll put in
the blurb anyway...
i'm using CAM::PDF to parse data. this works well. however, i am
trying to extract information out of a table. so, i want to find
certain keys, then go up 3 levels and grab the position of that peace
of data so
On Sun, Apr 3, 2011 at 5:05 PM, Wernher Eksteen wrote:
> Got this to work, but is there a better way to do this?
>
> #!/usr/bin/perl
>
> use strict;
> use warnings;
>
> my ( $val, @matched, @unmatched, %hash1, %hash2 );
someone else is sure to call you out on defining this stuff at the
beginning
yeah, i didn't read the sample output. so, here ya go.
On Sun, Apr 3, 2011 at 6:06 PM, Rob Dixon wrote:
> On 03/04/2011 18:05, Wernher Eksteen wrote:
>> Got this to work, but is there a better way to do this?
>>
>> #!/usr/bin/perl
>>
>> use strict;
>> use warnings;
>>
>> my ( $val, @matched,
On Sun, Apr 3, 2011 at 6:32 PM, John W. Krahn wrote:
> shawn wilson wrote:
>>
>> this is pretty abstract from what i'm really doing, but i'll put in
>> the blurb anyway...
>>
>> i'm using CAM::PDF to parse data. this works well. however, i am
>&g
On Sat, Apr 9, 2011 at 3:29 PM, wrote:
> Hi Chris,
>
>> It is detecting but not testing if any particular 2 words are in a
>> text field and I think that's what you explained you were testing for.
>
> Sorry if my first post was misleading. Those were just some examples.
> I'm looking on
On Sun, Apr 10, 2011 at 12:27 AM, Brian F. Yulga
wrote:
> shawn wilson wrote:
>>
>> On Sat, Apr 9, 2011 at 3:29 PM, wrote:
>>
>>>
>>>> my $address_count = () = $str =~ /box|street|avenue|lane|apo/ig;
>>
>> what does prin
On Apr 10, 2011 4:05 AM, "Sunita Rani Pradhan"
wrote:
>
> sysopen(DATA,"list1.txt",O_RDWR|O_TRUNC);
>
Why not just use open with +< ? I've never seen the benefit of sysopen
unless you're working with a stream. Also, I don't know those options are
compatible with each other.
> It is failing with
On Apr 8, 2011 4:42 PM, "Uri Guttman" wrote:
While I don't agree with uri's reaction to the post, xs ain't beginner (but
something this 'beginner' has been thinking of getting into recently).
>
> as for other places, google helps. there is usenet (still alive),
> perlmonks, lists.perl.org to fin
On Apr 10, 2011 5:54 AM, "John W. Krahn" wrote:
>
> shawn wilson wrote:
>>
>>
>> heh, i've got to learn to test my code before posting - i'm ending
>> looking like an idiot :)
>> *sigh* this is what i wanted to say:
>>
>>
>
On Thu, Apr 14, 2011 at 11:27 PM, Peter Scott wrote:
> On Thu, 14 Apr 2011 10:47:17 -0700, sono-io wrote:
>
>> On Apr 14, 2011, at 10:15 AM, Uri Guttman wrote:
>>
>>> goto just shouldn't be in your vocabulary. there is no reason for it at
>>> all in any decent language, especially perl.
>>
>>
On Sat, Apr 16, 2011 at 10:33 AM, muthukumar swamy wrote:
> I am trying to convert the tables in pdf to Excel. I am using CAM::Pdf
> module for reading the text from Pdf. please suggest me anyone for
> other way for converting PDF to Excel.
>
you're going to have to try real hard to make it accur
On Apr 18, 2011 1:51 AM, "Uri Guttman" wrote:
>
> > "SF" == Shlomi Fish writes:
>
> >> NEVER do that for such a simple problem. eval string is a last resort
> >> when no other technique can work well.
>
> SF> Well, you are right naturally, but there is no need to be so
> SF> rude. Start y
On Tue, Apr 19, 2011 at 9:22 AM, Rob Dixon wrote:
> On 19/04/2011 12:56, Jenda Krynicky wrote:
SF> Well, you are right naturally, but there is no need to be so
SF> rude. Start your email with a greeting, continue with a
SF> compliment, use soft words, etc. Otherwise,
>
> and i will still reply with strong (but not rude) words about very bad
> code here. newbies need to learn to not touch the stove before they get
> burned. nothing is worse than a newbie who learns symrefs and string
> eval and starts to use them for everything. i have seen that before and
> it
so, i haven't seen much 'perl' discussion on this list today. and i
was hoping that this thread has gone on long enough that it might make
some think twice before being rude, spiteful, whatever. i'm pretty
sure that we're all adults and that none of us will change. those that
want to post will do s
On Apr 20, 2011 1:05 AM, "ai nguyen" wrote:
>
>
> A population of 20 cows, each one has age and weight (known).
Irrelevant
> Device this population into 2 group, each group has 10 cows.
>
two data sets to compare
> Questions:
> How to pick a cow on each group so that a distribution of AGE and
>
On Apr 21, 2011 5:38 AM, "cc" wrote:
>
> Hi,
>
> I have two strings that shows different times and I
> want to find the difference in # of hours.
>
DateTime?
search.cpan.org/~drolsky/DateTime-0.66/lib/DateTime.pm
> In PHP, there's strtotime(), but there isn't one
> in Perl that I can find.
>
Why
On Apr 21, 2011 12:17 PM, "Karl Kaufman" wrote:
>
> Alternatives to shawn's response (w/o commenting on relative benefits)...
You won't mention the benefits, but I will... :)
>
> - Original Message - From: "cc"
> To:
> Sent: Thursday, April 21, 2011 4:37 AM
> Subject: time format conver
On Apr 21, 2011 2:27 PM, "Rob Dixon" wrote:
>
> On 21/04/2011 19:19, Jim Gibson wrote:
>>
>> On 4/21/11 Thu Apr 21, 2011 10:59 AM, "Rob Dixon"scribbled:
>>>
>>> On 21/04/2011 18:09, ai nguyen wrote:
I truly appreciate your responses. It is one of the interview
questions at go
either you're phrasing things wrong or i'm misunderstanding things.
either way, i'll answer as i understand the questions.
On Fri, Apr 22, 2011 at 1:11 PM, wrote:
> I realize that this list may not be the best, or even most
> appropriate, place to ask this question, but I'm just so curio
first, this isn't the proper forum. second...
On Fri, Apr 22, 2011 at 12:47 PM, Agnello George
wrote:
> Hi All
>
> i am creating a script for deployment of websites and i need to create
> hash %config ( which stores a lot of configurations setting for
> each type of website ) ... i have been
On Fri, Apr 22, 2011 at 1:21 PM, Agnello George
wrote:
> On Fri, Apr 22, 2011 at 10:41 PM, wrote:
>> I realize that this list may not be the best, or even most
>> appropriate, place to ask this question, but I'm just so curious that I'm
>> losing sleep over it! =;)
>>
>> What is
1 - 100 of 274 matches
Mail list logo
