Alejandro Santillan wrote:
> I would like to know if there exists some module that is able con add and
> substract times.
>
> For example, I want to see the time in seconds between the beginning and
> ending of an application.
> Something like this:
>
> $a="13:12:01";
> $b="13:02:01";
>
> $c=$a-
Sisyphus wrote:
> - Original Message -
> From: "Craig Cardimon" <[EMAIL PROTECTED]>
> .
> .
>> I thought we were immortal
>
> Yep, we *were* but only for a little while :-)
>
> Cheers,
> Rob
Shhhkeep your voice down. [Gesti
Sisyphus wrote:
> - Original Message -
> From: <[EMAIL PROTECTED]>
> .
> .
>> I'd
>> expect to see them only in museums by then--being used as paperweights,
>> door-stops, etc.
>>
>
> In 2038 I'll be 86. I don't take it for granted that I'll be seeing anything
> at all :-)
>
> Cheers,
>
I have something like this:
while ()
{
if (// .. /<\/TAG>/)
{
# process line
}
}
I got this from http://www.perl.com/pub/a/2004/06/18/variables.html.
My special wrinkle is, I want to process certain sections of a file, but
only if that section passes certain criteria.
I want to
Lyle Kopnicky wrote:
Craig Cardimon wrote:
I'm looking for patterns where the sign "%" or the word "percent" are
preceded by a group of one or more digits and zero or more spaces.
if( $line =~ /\%|\bpercent\b/i )
{
if( $line =~ /\d+\s*(\%|\bpercent\b/i )
{
I'm looking for patterns where the sign "%" or the word "percent" are
preceded by a group of one or more digits and zero or more spaces.
if( $line =~ /\%|\bpercent\b/i )
{
if( $line =~ /\d+\s*(\%|\bpercent\b/i )
{
# magic happens
}
}
Am I on the right track here? In the tex
$Bill Luebkert wrote:
Dial, Joe wrote:
Hi,
When I read the first post, I remembered seeing that somewhere before.
Then, I was amazed to see the "this is not what the range operator was
meant to do."
So, I looked for it. Found it in chapter 6 of the Perl Cookbook. Its
Recipe 6.8.
See this UR
$Bill Luebkert wrote:
Dial, Joe wrote:
Hi,
When I read the first post, I remembered seeing that somewhere before.
Then, I was amazed to see the "this is not what the range operator was
meant to do."
So, I looked for it. Found it in chapter 6 of the Perl Cookbook. Its
Recipe 6.8.
See this UR
Thanks for the replies, folks! I got all kinds of responses.
I've seen a "here's one way to do it," a "we could use more information
on what you're trying to do," and a "this is not what the range operator
was meant to do."
It's kind of fascinating, really. List members use perl for different
ta
I need to read a large text file line by line until a certain tag is
found, say . This tag will exist on a line by itself. Then I need
read in all subsequent lines, appending them to each other, until the
ending tag is found, again on a line by itself.
My logic, if you can call it that, looks
Chris Wagner wrote:
Did anyone else also just receive a boat load of old messages from the list?
I've got about 25 and more coming. They go back to October. And the really
funny thing about it is they're all from threads I participated in. I
checked out the headers and they're originating from
I wanted to make a joke about the subject, but every time I try such a
thing, it never comes out right. Sigh.
-- Craig
---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0549-2, 12/06/2005
Tested on: 12/6/2005 12:54:08 PM
avast! - copyright (c) 1988-2004 ALWIL Software.
http:/
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Friday, October 07, 2005 1:42 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: Re: regenerating AS perl html docs
Now I see what happened. Somebody at ActiveState thought they would be cute
by replacing
Chris Wagner wrote:
At 02:46 PM 9/26/05 -0400, Craig Cardimon wrote:
I am reading in portions of large files into string variables. The
number of and size of the files vary by month. Right now I'm working
with nearly 70,000 files, the largest of which is 7 GB. Not all files
are proc
, the entire file is read in for section by section
processing.
Chris Wagner wrote:
What exactly is using up all the memory? Are u reading in large variables,
using too many file handles... we need more information.
At 11:40 AM 9/26/05 -0400, Craig Cardimon wrote:
I'm working with lar
I'm working with large numbers of files that can vary in size up to 4 GB
and more. Every time I try tackling them straight on I run out of
virtual memory. The files are sequentially numbered somewhat like SS
numbers -- they contain hyphens. The file numbers are unique as far as I
can tell.
Is
I am passing to the parser the results I get from using
Text::Context::EitherSide. I can't pass in the entire file. Some of the
files are 60 MB and larger. My machine freezes and crashes if I do that.
I'll re-read the spec again and see what I come up with.
-- Craig
Thomas, Mark - BLS CTR wro
I'm using HTML::TokeParser to remove HTML. This functions very well when
tags are contained on one line.
What happens when you're reading a file line by line, and the HTML tag
is split between lines? The HTML I'm dealing with is sometimes broken
up. For instance, I'll get lines beginning with
I'm connecting to two databases at the same time, test and production. I
have two sets of DSN connections and connection checks:
my $DSN = "Real";
my $DSN2 = "Test";
my $connection = new Win32::ODBC($DSN);
my $connection2 = new Win32::ODBC($DSN2);
## Make su
When using Win32::ODBC, what exactly is the DSN or "Data Source Name?"
I got this from the web:
***
Creating the ODBC data source:
An ODBC data source name(DSN) contains the connection information to
access a database.
It can be created and configured via the ODBC Data Source Administrator:
I'm inserting processed text into SQL Server. I thought my problem was
grounded in the physical size of the file being inserted. The file that
failed is 8,949 KB, but another file inserted earlier is larger 8,954 KB.
One error message I got:
[911] [1074] [0] "[Microsoft][ODBC SQL Server Drive
Another user kindly pointed the filtering idea out to me. I have since
done so.
-- Craig
Ted Schuerzinger wrote:
Craig Cardimon graced perl with these words of wisdom:
I would like to request better, but still brief, subject lines.
My email system flagged the original "mystery"
I would like to request better, but still brief, subject lines.
My email system flagged the original "mystery" email as spam.
Thunderbird's success rate is 99 percent. The 1 percent where it fails
is where the subject lines are, well, mysterious, or composed of one or
two words.
Is anyone el
I'm working with ASCII text files that can be so big they'll make you
wince. We're talking 40 MB and up. I'm scanning all files, seeing if
they contain info we want, and then extracting any desired info from each.
Or trying to, anyway. Yesterday I got a nasty "Memory Allocation Error"
in my fe
$Bill Luebkert wrote:
Craig Cardimon wrote:
I'll try it. Couldn't hurt.
-- Craig
Peter Eisengrein wrote:
If this is a problem, why not use the editor for editing, but use simple ol'
notepad when you want to copy/paste something? Or does that not make any
difference?
For god'
I'll try it. Couldn't hurt.
-- Craig
Peter Eisengrein wrote:
If this is a problem, why not use the editor for editing, but use simple ol'
notepad when you want to copy/paste something? Or does that not make any
difference?
My $0.02,
Pete
---
avast! Antivirus: Outbound message clean.
Virus Database
I also have an editor I think is rather good (PrimalScript).
When I copy and paste a troublesome block into an email, the code
becomes an unholy mess I must dive into and manually fix, line by line.
I've emailed myself several times, to see just what you folks are begin
subjected to. By god, it
specify a name for the column:
SELECT substring(ContracTerms,0,1000) as ContractTerms
Rick
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Craig
Cardimon
Sent: Friday, April 29, 2005 2:39 PM
To: ActivePerl; Perl-Win32-Users@listserv.ActiveState.com
Subje
What I'm trying to do looks something like this:
SELECT substring(ContractTerms, 0, 1000) "$ContractsTest_ContractTerms"
FROMContractsTest
WHERE refnum = '1'
I'm using Perl 5.8.6.811 on Windows XP Pro. I'm using Win32::ODBC to
connect to a SQL Server 2000 database.
I'm printing out the res
The module I have used successfully is Net::FTP. Don't know about the
"Common" part. Haven't needed it.
Along with Net::FTP, I also use strict, warnings, diagnostics,
LWP::Simple, and LWP::Authen::Basic.
-- Craig
Kelly Stumbaugh wrote:
Does anyone running Perl on Windows recommend a module for
I use Perl because I know it and like it, and my computer runs Windows
XP Professional.
-- Craig
Артем Аветисян wrote:
Hello, all!
Is there any serious usage of Perl for Windows?
Here, in Moscow, I know quite few programmers who used to develop using Perl
(under UNIX). And I doubt they still do.
I am working with huge ASCII text files and large text fields.
As needs and wants have changed, I will be reprocessing data we have
already gone through to see if more records can be extracted.
I will need to compare strings to ensure that records I am inserting
into our SQL Sever 2000 database
Thank you. I'll take this for a spin around the block. These heavy-duty
pattern matches kick my caboose nearly every time.
-- Craig
Roger Keane wrote:
Craig Cardimon wrote:
I'm searching large ASCII files for keywords. The keywords are part of
section headings. These headings are in a
start out fast and get slower as it goes? Or is it slow from the
start?
-Original Message-
From: Craig Cardimon [mailto:[EMAIL PROTECTED]
Sent: Tuesday, March 15, 2005 3:28 PM
To: Perl-Win32-Users@listserv.ActiveState.com; ActivePerl
Subject: Keyword search is dragging
I'm searching l
That makes sense, but I've already tried it. Slurping each file into an
array of lines doesn't work in this case because of the size of the
files. Each file can be 40 to 80 MB or even larger. That blows my
computer's memory and results in a nasty error message.
-- Craig
Chris Wagner wrote:
I do
Thanks much, Deane.
I found a relevant Perl Monastery article titled, "How do I read an
entire file into a string?" here:
http://www.perlmonks.org/index.pl?node_id=1952
The Perl Monastery also links to an article on slurping at:
http://www.perl.com/pub/a/2003/11/21/slurp.html.
Wow. Lots of food f
I'm searching large ASCII files for keywords. The keywords are part of
section headings. These headings are in all caps on lines by themselves.
The files sometimes contain HTML tags. My logic handles this well
enough, but combs through the HTML very slowly. I'm dealing with tens of
thousands of
I use "$| = 1;" myself. It works well enough. There is a thing with the
buffer and memory and all that fun stuff.
It doesn't always function as quickly or as smoothly as I would like it
to, but it is much better than not using it.
-- Craig
Lyle Kopnicky wrote:
Hi folks,
Autoflush doesn't seem t
wholefile2));
on my file, all the tags are removed, but so ALL the formatting. The
hitherto nicely laid-out document is one great big unreadable blob of text.
What am I missing?
--
Craig Cardimon
AUS INC.
---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0510-0, 03/08/2005
Tested
;
***
to strip all angle braces from the text. It works like gangbusters, but
I've discovered it works a little too well.
Now I need something I can apply more judiciously. Any hints, tips, or
suggestions would be appreciated.
--
Craig Cardimon
AUS INC.
(Knowledge Express Data Systems; 1-80
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
--
Craig Cardimon, Programmer
AUS Inc.
(Knowledge Express Data Systems; 1-800-529-5337, ext. 24)
___
Perl-Win32-U
I need to take capped section headings and change them into initial or
tital case. I have coding that does this.
However, my logic also changes acronym names such as IBM and PDF into
Ibm and Pdf.
Is there a way to exempt certain words or configurations of letters
without building a dictionary
I'm searching a textarea that has been split into an array of lines. I'm
looking for certain keywords that are centered like headings, or all by
themselves on a line, right or left justified. They may also be
scattered in the text within sentences, but I don't want those occurrences.
The logic
I am searching text files for the keyword Exhibit or Form followed by a
number, a decimal, and any number of letter or numbers within
parentheses or not.
For example:
Exhibit 12
Exhibit 12.1
Exhibit 12(a)
Exhibit 12.1(a)
Exhibit 12.1(2)
Exhibit 12.1(a)(b)
Exhibit 12.1(1)(2)
Exhibit 12 (a)
Exhibi
Is there a way to see the filenames in a *.zip file, open the files, and
search their contents without extracting that *.zip file?
I'd appreciate a gentle push in the right direction.
--
Craig Cardimon, Programmer
AUS Inc.
(Knowledge Express Data Systems; 1-800-529-5337, ex
I have this logic to follow:
while()
{
if(/START/ .. /END/)
{
# process line
}
}
I found this logic in an article
(http://www.perl.com/pub/a/2004/06/18/variables.html) on Perl's Special
Variables at Perl.com.
I want to try modifying the logic to process a
I'm using Perl 5.8.3.809 on a machine running Windows XP Professional.
I'm processing text files of various sizes. The one that is giving me
problems is 22.5 MB.
I can process this file by itself without incident, but if I process it
as part of a group using a loop, I get the following error:
ord_char} = $hash{$ord_char} + 1;
}
}
}
foreach $ord_char (sort {$a <=> $b} keys %hash) {
print $ord_char." (".chr($ord_char).") - ".$hash{$ord_char}."\n";
}
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To uns
iveState.com/mailman/mysubs
--
Craig Cardimon, Programmer
AUS Inc.
(Knowledge Express Data Systems; 1-800-529-5337, ext. 24)
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
I sometimes receive an odd message that says something like, "The Perl
Command Line Interpreter has encountered an error and needs to close." I
click okay and all processing stops. In the output window, the last line
says, "Exit code: -1073741819 , C005h"
I've tried looking Googling "107374
If a mail system considers "fri**in*" objectionable, then I consider the
system inadequately programmed, and the programmer inadequate to the task.
I mean, really.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of $Bill
Luebkert
Sent: Friday, January 09, 2
That's a new suggestion! Thank you.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Stephen Patterson
Sent: Wednesday, November 19, 2003 2:35 PM
To: [EMAIL PROTECTED]
Subject: Re: Removing HTML tags
Craig Cardimon wrote:
>I'm calling
. I'm trying to determine, simply by
eye-balling, what qualifies a document for abstraction.
Has anyone done something like this?
Sincerely,
Craig Cardimon, Programmer
AUS Inc.
(Knowledge Express Data Systems; 1-800-529-5337, ext. 24)
___
Perl-W
I would try:
s/\n//g;
This should replace every newline with nothing, globally.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
David Byrne
Sent: Wednesday, October 08, 2003 4:09 PM
To: [EMAIL PROTECTED]
Subject: [SPAM] newline...be gone
Greetings,
I
I would be appreciated.
Sincerely,
Craig Cardimon, Programmer
AUS Inc.
(Knowledge Express Data Systems; 1-800-529-5337, ext. 24)
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
55 matches
Mail list logo
