Re: skipping a repeated header

2009-05-27 Thread Kirk Wythers
t_Avg2, $S_RXResponse, $Wind_RXResponse, $I_WS_MS ), "\n"; } __END__ On May 27, 2009, at 10:42 AM, Wagner, David --- Senior Programmer Analyst --- CFS wrote: -----Original Message- From: Kirk Wythers [mailto:kwyth...@umn.edu] Sent: Wednesday, May 27, 2009 09:31 To: beginne

skipping a repeated header

2009-05-27 Thread Kirk Wythers
I have a large datafile that I am trying to read into a postgresql database. I think I have the db_connect stuff down, but I'm fighting with the part that reads the file to be processed. The file contains a repeating structure of header lines like this: TOA5B4WARM_CCR1000 16474

Re: What does MakeFile do?

2009-01-28 Thread Lewis Kirk
on the remote server and changed permissions. Before I had the folder organization wrong. In the calling file I used use lib '.'; to get the dependencies. So my question still stands: What does MakeFile do that just copying the .pm files doesn't? Thanks for your help. -- Lew

What does MakeFile do?

2009-01-18 Thread Lewis Kirk
does make do? Is there a way to do it locally (on MacOSX) and then upload? Or is the installation server specific? (I did try it via Terminal, but it threw an error and did not complete.) -- Lewis Kirk www.dmzgraphics.com 803-787-3450 -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org

trouble with a regular expresion

2008-10-23 Thread Kirk Wythers
Below is snipit of code that is intended to read in the station_id from the header of each example file. In each case the reg expression is supposed to find the 6 digit number within the parentheses. Both files contain 6 lines in the header. For some reason the reg expression will not catch

returning groups from a string

2008-01-10 Thread kirk
I have a serties of strings john doe sam f smith joe s thomas jr i need a regex that will return each word in the string. I have tries variations on (.*)\b(.*) but i can't get it. what is the proper syntax? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: aggregating time steps

2007-08-24 Thread Kirk Wythers
tals{$year}{$month} {count}, $totals{$year}{$month}{tmax} / $totals{$year}{$month} {count}, $totals{$year}{$month}{tmin} / $totals{$year}{$month}{count, etc Kirk $hash{foo}{bar} = 10; and the hash reference needed to store the second level will auto-magically come into existence.

Re: aggregating time steps

2007-08-24 Thread Kirk Wythers
On Aug 23, 2007, at 11:17 PM, Gunnar Hjalmarsson wrote: Kirk Wythers wrote: I don't see how $totals{$year}{$month}{count} ++; is holding the count. Read about the auto-increment operator in "perldoc perlop". OK. I'll try and be more clear to the degree of my ignoranc

Fwd: aggregating time steps

2007-08-23 Thread Kirk Wythers
Begin forwarded message: On Aug 23, 2007, at 4:25 PM, Mr. Shawn H. Corey wrote: # How about? my ( $year, $month, $doy, $tmax, $tmin, $par, $precip, $NH4, $NO3, $O3, $CO2, $V1, $V2, $V3, $V4 ) = split; # You can now store your totals by month as: $totals{$year}{$month}{tmax} += $tmax; .

aggregating time steps

2007-08-23 Thread Kirk Wythers
Sorry for the "not sure where to even begin" nature of this email, but I am stuck. I am trying to put together a aggregating script that takes daily climate data and produces monthly averages. For example, the input file has the form: year month doy tmax tmin par precip NH4

Re: run script on multiple files

2006-12-24 Thread Kirk Wythers
On Dec 24, 2006, at 2:59 AM, John W. Krahn wrote: Yes I saw where you tested $year but since I don't have the actual data to test with I had to guess, and I guess I guessed wrong. :-) I thought you did an amazing job at guessing what I intended without being able to look at a datafile

Re: run script on multiple files

2006-12-23 Thread Kirk Wythers
On Dec 23, 2006, at 9:25 PM, Chris Charley wrote: - Original Message - From: "Kirk Wythers" <[EMAIL PROTECTED]> Newsgroups: perl.beginners To: "John W. Krahn" <[EMAIL PROTECTED]> Cc: "Perl Beginners" Sent: Saturday, December 23, 2006 1:32 PM

Re: run script on multiple files

2006-12-23 Thread Kirk Wythers
Thanks or the reply John. I have a couple of questions inline. On Dec 22, 2006, at 10:53 PM, John W. Krahn wrote: #! /usr/bin/perl -w use strict; use Date::Calc qw(Day_of_Year); use DBI; #MICIS climate data munger. Required input argument is the file to process. #Use > to redirect output to n

Re: run script on multiple files

2006-12-22 Thread Kirk Wythers
On Dec 22, 2006, at 8:33 PM, Chad Perrin wrote: On Fri, Dec 22, 2006 at 08:04:39PM -0600, Kirk Wythers wrote: I have written a short perl script that munges climate data and then loads it into a postgres database. It works fine on one file at a time... syntax is ./program.pl filename I would

run script on multiple files

2006-12-22 Thread Kirk Wythers
I have written a short perl script that munges climate data and then loads it into a postgres database. It works fine on one file at a time... syntax is ./program.pl filename I would like to run it in a directory with multiple files. I have tried syntax ./program.pl file1 file2, but only th

Re: asking for y or n

2004-12-14 Thread Kirk Bauer
$/) { unlink($filename) && print "File '$filename' has been deleted.\n"; } This requires the user to hit y or Y and then ENTER. It is possible to do this without the enter but it takes more work. -- Kirk Bauer <[EMAIL PROTECTED]> http://linux.kaybee.org |

RE: Need advanced help with tracking down warnings in eval'd functions

2004-12-09 Thread Kirk Bauer
On Thu, 9 Dec 2004, Bakken, Luke wrote: > Or modules for that matter. When I first read the eval trickery my first > thought was "WHY???". Well, I have a set of script files. Each file is split into an init section and several different scripts. The init section is eval'd right away and each sc

Re: Need advanced help with tracking down warnings in eval'd functions

2004-12-09 Thread Kirk Bauer
n try to put together some code for you. Thanks! -- Kirk Bauer <[EMAIL PROTECTED]> http://linux.kaybee.org | www.autorpm.org | www.logwatch.org -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Need advanced help with tracking down warnings in eval'd functions

2004-12-09 Thread Kirk Bauer
t;; } }; Any help with this, pointers to other mailing lists, or alternative approaches would be greatly appreciated. FYI the strings being eval'd come from external files that are split into section and are eval'd in several pieces. -- Kirk Bauer <[EMAIL PROTECTED]> ht

RE: Perl and Visual Basic

2002-05-03 Thread DeBaets, Kirk
I am going to go on the same assumption (ActivePerl) and recommend PerlCtrl from the PDK. With a couple of minor modifications to the script you can turn your Perl app into an ActiveX dll that is easy enough for your VB to use. -Original Message- From: John Brooking [mailto:[EMAIL PROTEC

RE: select from oracle and write to file

2002-05-01 Thread DeBaets, Kirk
Between execute and finish add fetchrow_array() to get the result set, and then do with the rows what you wish. E.g., my @row; while ( @row = $sth->fetchrow_array() ){ print "Row: @row\n"; } -Original Message- From: garrett esperum [mailto:[EMAIL PROTECTED]] Sent: Tuesday, April 30,

RE: Can I set this as a hash?

2002-03-25 Thread DeBaets, Kirk
Sounds like you are looking for a hash of arrays. From _Programming_Perl_ : Use a hash of arrays when you want to look up each array by a particular string rather than merely by an index number. In our example of television characters, rather than merely looking up the list of names by th

Re: Perl & SQL help! Need to insert records into two tables

2002-03-12 Thread M. Kirk DeBaets
You said ... I'm trying to add a new record (new values) into one table and I have a second table that refers to the record number of the first table. I can get the SQL statement to grab the current value of the incrementing record number to work, but I need to translate this to operate in perl

RE: text editors

2002-03-09 Thread M. Kirk DeBaets
If you want something more generic, try VIM. If you are comfortable with vi, then this is a sure hit. http://www.vim.org -Original Message- From: Russ Foster [mailto:[EMAIL PROTECTED]] Sent: Friday, March 08, 2002 10:05 AM To: 'michael'; '[EMAIL PROTECTED]' Subject: RE: text editors If

RE: Invoke MS EXCELL From Perl

2002-03-07 Thread M. Kirk DeBaets
> #---End session transcript--- #---Begin code example--- #!c:\perl\bin -w use GD::Graph::linespoints; $graphic = GD::Graph::linespoints->new(); $graphic->set('title'=> 'Kirk Test', 'label'=> 'Label', 'a