On Mon, 10 Feb 2003 12:32:16 -0600, Dan Muey wrote:
> I'm tryin got find the quickest way to creat a file and write to it.
>
> I know I can do
> open
> print FILEHANDLE $stuff;
> close...
> and perhaps ad some flocks for good measure
>
> what I'm wondering is if there is a one line way to
hi friends,
i use useragent to get some web page and store it in htm. i use useragent module. when
i run in my windows machine i get the desired output. now the mecine is changed now
also windows, when i run i get the error message
"can't locate LWP/UserAgent.pm in @INC (@INC contains: .)"
wh
Madhu Reddy wrote:
> Hi,
>I want find a duplicate records in a large file
> it contains around 22 millions records.
>
> basically following is my file structure
>
> C1 C2 C3 C4
>
> 12345 efghij klmno pqrs
> 34567 abnerv oiuuy uyrv
If i were goin
use Perl;
* split data into smaller data bits
* clean smaller data bits
* merge smaller data bits into slightly larger data bits
* repeat last two steps until all data is clean
>
> We are trying to load date into teradata [which is
> data warehousing, stores Terabytes of data, and which
> is
>
> 1 word. Oracle.
>
> This is really why database software exists. I know
> this probably
> didn't help much, but if this is more than a one
> time occurrence a real
> database ought to be considered.
>
> You might start by checking out any reference
> material on how large
> database syst
On Mon, 10 Feb 2003 17:53:10 -0800, Madhu Reddy wrote:
>I want find a duplicate records in a large file
> it contains around 22 millions records.
I also feel like Wiggins that a database is the right way to solve it.
On the other hand, 22 millions isn't that big on modern computers.
> If I include a link on my site to a file that sits on the server(e.g.
> *.mp3), the viewer will get the "Save as.." box and can coninue with the
> download. My question is: what is the defoult transfer mode for the above
> described action? ASCII or binary? Is it dependend on the browser?
I do
Harry Putnam <[EMAIL PROTECTED]> writes:
> Running the ls from inside perl program
>
> #!/usr/bin/perl -w
> ## Notice the pipe symbol
Some kind of conspiracy has removed the PIPE symbol I referenced
(probably a `senior moment')
> open(PROC,"ls ");
should have a pipe lik
Madhu Reddy wrote:
Hi,
I want find a duplicate records in a large file
it contains around 22 millions records.
basically following is my file structure
C1 C2 C3 C4
12345 efghij klmno pqrs
34567 abnerv oiuuy uyrv
...
...
...
..
C1 C2 C3 C4
12345 efghij klmno pqrs
34567 abnerv oiuuy uyrv
94567 abnerv gtuuy hyrv
12345 aswrfr rtyyt erer
94567 abnerv gtuuy hyrv
Here row1 and row4 are duplicates...those needs
to be removed or moved to another file
--- Madhu Reddy <[EMAIL PROTECT
Hi,
I want find a duplicate records in a large file
it contains around 22 millions records.
basically following is my file structure
C1 C2 C3 C4
12345 efghij klmno pqrs
34567 abnerv oiuuy uyrv
...
...
...
...
Dan wrote:
> Hi
>
> Is it possible to share variables between 2 perl scripts running as 2
> separate processes? I've looked on CPAN but can't see any names that are
> obvious they do that kind of thing.
>
> Thanks in advance.
>
> Dan
use a simple share memory method such as IPC::ShareLite. exa
This is what you need
http://theoryx5.uwinnipeg.ca/CPAN/data/IPC-Shareable/IPC/Shareable.html
Tor.
dan wrote:
>
> Hi
>
> Is it possible to share variables between 2 perl scripts running as 2
> separate processes? I've looked on CPAN but can't see any names that are
> obvious they do that kind
Tanton Gibbs wrote:
>> a machine with 4 cpu and 3gb of memory is definitely hard wired to crunch
>> number and boost i/o performance. not accounting for machine load, there
> is
>> very little reason your Perl script will run slower on a powerful
>> machine.
>
> I've found this to be not true mos
Hi,
Thanx all for u r input...
I ran only once on two systems for comparision
What i observed is, when i ran on small machine ( 1cpu
and 512 MB ram), CPU utilisations going to above
95 %...memory utilisation is 50%
and when i ran on 4 cpu machines, cpu utilisation is
not more than 50%...me
From: "R. Joseph Newton" <[EMAIL PROTECTED]>
> If you are doing this for a dissertation, presentation will be
> important. So also will be commenting. It is not a bad idea to add a
> short comment for each variable you declare to indicate what role it
> plays in terms of the whole. You also shoul
Hi
Is it possible to share variables between 2 perl scripts running as 2
separate processes? I've looked on CPAN but can't see any names that are
obvious they do that kind of thing.
Thanks in advance.
Dan
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PR
I am planning to distribut my module, but am confused on what to call
it.
I have a series of modules in a directory that I will call Rtf2xml. (I
checked on Cpan, and don't believe this name space is taken.)
I named each module by a simple name--for example Pict.pm. In the main
script, I have:
"Michael Hooten" <[EMAIL PROTECTED]> writes:
> perldoc CPAN
> [snip]
>
> The interactive mode is entered by running
>
>perl -MCPAN -e shell
I'm not having a problem entering the interactive shell. I just
don't have cmd hist when I get in it.
> which puts you into a readline interfac
Benjamin Jeeves wrote:
> Hi all
>
> This is what I have been work on over the weekend and a bit more and now it
> works so here it is. Please comment on it. As you might see I my develop a
> simple Intrusion Detection System I will be adding more signatures in time
> and there is a sensor for it t
> a machine with 4 cpu and 3gb of memory is definitely hard wired to crunch
> number and boost i/o performance. not accounting for machine load, there
is
> very little reason your Perl script will run slower on a powerful machine.
I've found this to be not true most of the time. The larger machin
On Mon, 10 Feb 2003 16:42:43 -0800, [EMAIL PROTECTED] (David) wrote:
>Chris wrote:
>
>> I need to work with epoch time past the year 2038.
>>
>> my $time = gmtime(2147483647 + 1);
>> print $time;
>>
>> any ideas?
>
>try:
>
>#!/usr/bin/perl -w
>use strict;
>
>use Date::Manip;
>
>print "35 years a
Chris wrote:
> I need to work with epoch time past the year 2038.
>
> my $time = gmtime(2147483647 + 1);
> print $time;
>
> any ideas?
try:
#!/usr/bin/perl -w
use strict;
use Date::Manip;
print "35 years and 20 minutes from now is: ",
UnixDate(ParseDate("35 years 20 minutes"),"%s"),"\n
Madhu Reddy wrote:
> Hi,
>When i ran perl script on multi processor
> machine...
> it is taking more time as than on single processor
> machine
>
> Let me explain clearly
>
> I have big file (.5Gb) it has 8 million records...
> my perl script will read each record and validates..
> V
From: Madhu Reddy <[EMAIL PROTECTED]>
>When i ran perl script on multi processor
> machine...
> it is taking more time as than on single processor
> machine
>
> Let me explain clearly
>
> I have big file (.5Gb) it has 8 million records...
> my perl script will read each record and val
Madhu Reddy,
One thing you can't discount is disk drive I/O time. Do you know what the specs
are for disks/controllers and their configurations between each machine? Could
be that one disk setup is faster than another..
John :-)
"Wiggins d'Anconia" <[EMAIL PROTECTED]> on 02/10/2003 0
Madhu Reddy wrote:
Hi,
When i ran perl script on multi processor
machine...
it is taking more time as than on single processor
machine
Let me explain clearly
I have big file (.5Gb) it has 8 million records...
my perl script will read each record and validates..
Validation includes..ch
I need to work with epoch time past the year 2038.
my $time = gmtime(2147483647 + 1);
print $time;
any ideas?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
On Mon, Feb 10, 2003 at 10:54:19 +, mario kulka wrote:
>
> If I include a link on my site to a file that sits on the server(e.g.
> *.mp3), the viewer will get the "Save as.." box and can coninue with the
> download. My question is: what is the defoult transfer mode for the above
> described
Is this a perl question?
Are you using Net::FTP or something ?
>
>
> If I include a link on my site to a file that sits on the server(e.g.
> *.mp3), the viewer will get the "Save as.." box and can
> coninue with the
> download. My question is: what is the defoult transfer mode
> for the abov
More than likely, it is disk IO time, not processor time that is causing the
slow down. It could be that the larger box has a slower file system due to
replication or redundancy. The smaller box probably has a small file system
that allows faster access.
- Original Message -
From: "Madhu
If I include a link on my site to a file that sits on the server(e.g.
*.mp3), the viewer will get the "Save as.." box and can coninue with the
download. My question is: what is the defoult transfer mode for the above
described action? ASCII or binary? Is it dependend on the browser?
Mariusz
Hi,
When i ran perl script on multi processor
machine...
it is taking more time as than on single processor
machine
Let me explain clearly
I have big file (.5Gb) it has 8 million records...
my perl script will read each record and validates..
Validation includes..checking each record l
Benjamin Jeeves wrote:
>
> Hi all
Hello,
> This is what I have been work on over the weekend and a bit more and now it
> works so here it is. Please comment on it. As you might see I my develop a
> simple Intrusion Detection System I will be adding more signatures in time
> and there is a sensor
Jeff Westman wrote:
> If I read 2 files into separate arrays, I *should* be able to compare
> the arrays, and therefore see if the files are the same or not. SO
> why doesn't this work?
>
> #--- begin code
> #!/usr/local/bin/perl -w
>
> $f1 = "eghpoli1";
> $f2 = "eghpoli2";
>
> open(F1, "$f1") o
> if (@Af1 eq @Af2) { print "Files compare okay\n"; }
> else { print "Files differ\n"; }
> #
How about something clunky like this:
if (join("",@Af1) eq join("",@Af2)) { print "Files compare okay\n"; }
else { print "Files differ\n"; }
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For add
On Mon, 10 Feb 2003 13:55:46 -0800 (PST), Jeff Westman <[EMAIL PROTECTED]> wrote:
> If I read 2 files into separate arrays, I *should* be able to compare the
> arrays, and therefore see if the files are the same or not. SO why doesn't
> this work?
If I read 2 files into separate arrays, I *should* be able to compare the
arrays, and therefore see if the files are the same or not. SO why doesn't
this work?
#--- begin code
#!/usr/local/bin/perl -w
$f1 = "eghpoli1";
$f2 = "eghpoli2";
open(F1, "$f1") or die "cannot open $f1: $!\n";
open(F2, "
check this out:
http://www.rcbowen.com/imho/perl/modules.html#perl_Makefile_PL_make_make_tes
This way works for me.
Prachi.
Original Message Follows
From: Jeff Westman <[EMAIL PROTECTED]>
To: beginners <[EMAIL PROTECTED]>
Subject: Install Mod as NON-Root
Date: Mon, 10 Feb 2003 13:19
on ma, 10 feb 2003 21:19:18 GMT, Jeff Westman wrote:
> How do you install a perl module to your home directory if you do not
> have root access ??
This a Frequently Asked Question. See
perldoc -q "own module"
--
felix
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands,
>
> on ma, 10 feb 2003 19:04:01 GMT, Mario Kulka wrote:
>
> > $sth = $dbh->prepare ("SELECT LAST_INSERT_ID() FROM
> $table"); $sth ->
> > execute(); $ad_id = $sth->fetchrow_array();
> > $sth->finish();
> > ...
> >
> > The above works fine and gives me the last id, but what
> worries me is
How do you install a perl module to your home directory if you do not have
root access ??
Thanks in advance,
JW
__
Do you Yahoo!?
Yahoo! Mail Plus - Powerful. Affordable. Sign up now.
http://mailplus.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PR
>
> Dan Muey wrote:
> >
> > The print way worked for me also now that I did $|=1; and
> piped STDERR
> > to STOUT and also the $ftp debug to 1, to find my probs, thanks.
>
> You shouldn't need autoflush on, as the close should flush
> all your data for you. If you do need it, then:
>
>
on ma, 10 feb 2003 19:04:01 GMT, Mario Kulka wrote:
> $sth = $dbh->prepare ("SELECT LAST_INSERT_ID() FROM $table");
> $sth -> execute();
> $ad_id = $sth->fetchrow_array();
> $sth->finish();
> ...
>
> The above works fine and gives me the last id, but what worries me is
> the possibility of someon
>
>
> Yes, I have sudo, and I also have the passwords for the other
> users I need.
How are you, as you said below 'enter' ing the server? Browser, telnet, ssh, ftp,
etcc
It really depends on that method and if your server admin has things set up to let you
change
Users. Or if it's eve
On Mon, 10 Feb 2003 14:48:34 -0600, "Aman Raheja" <[EMAIL PROTECTED]> wrote:
> Hi friends
> I am doing exec in a foreach loop, resizing images.
> But as the the exec is kicked off, it never returns
> What's the way out?
> Here's the snippet
>
I think exec effectively exits your perl script, you might try system, do, backticks or
Use the imagemagic module to do all of this for you.
perldoc -f exec
perldoc -f system
Dan
>
>
> Hi friends
> I am doing exec in a foreach loop, resizing images.
> But as the the exec is kicked off, it nev
Mario Kulka wrote:
> hi,
> My form asks for the time in the format hh? mm? am/pm?
> However before I combine it all into one value (so I can insert it into my
> MySQL table) I would like to change the format to military time. I thought
> I could simply add 12 to the "hh" value when "am/pm" is pm,
Rob Dixon wrote:
>
> Hi all.
Hello,
> Just a warning about about a gotcha I just came across.
>
> When processing HTML documents, beware that
> or ISO \xA0 isn't matched by regex /\s/. Unless anyone
> knows how to persuade it to do so?
In message <[EMAIL PROTECTED]> on 28 Jan 2003,
David Eas
Aman Raheja wrote:
> Hi friends
> I am doing exec in a foreach loop, resizing images.
> But as the the exec is kicked off, it never returns What's the
> way out? Here's the snippet
> ---
> foreach(@$ref){
>
> $imgFile = @
Hi friends
I am doing exec in a foreach loop, resizing images.
But as the the exec is kicked off, it never returns
What's the way out?
Here's the snippet
---
foreach(@$ref){
$imgFile = @$_->[1].jpg;
$thbFile = @$_->[1
Yes, I have sudo, and I also have the passwords for the other users I need.
HTH
-Original Message-
From: Dan Muey [mailto:[EMAIL PROTECTED]]
Sent: Monday, February 10, 2003 10:19 PM
To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
Subject: RE: Running script as a different user
That's atricky
Mario Kulka wrote:
> hi,
> My form asks for the time in the format hh? mm? am/pm?
> However before I combine it all into one value (so I can insert it
> into my MySQL table) I would like to change the format to military
> time. I thought I could simply add 12 to the "hh" value when "am/pm"
> is pm,
Dan Muey wrote:
>
> The print way worked for me also now that I did $|=1; and piped
> STDERR to STOUT and also the $ftp debug to 1,
> to find my probs, thanks.
You shouldn't need autoflush on, as the close should flush all your data
for you. If you do need it, then:
autoflush $stor;
is nicer
That's atricky one. Do you have sudo or are running apache/ssh/however you are 'enter'
ing the server as setuid?
You'll probably need to talk to your server admin and ask him how you'd go about that
one.
More details may helpm though.
Dan
> -Original Message-
> From: yargo [mailto:[EMA
You should be able to do this using the Perl Expect module, although not
sure about the Windows part.
-Jose
- Original Message -
From: "Prachi Shah" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, February 10, 2003 1:08 PM
Subject: run UNIX commands from windows using Perl
> H
Hi all,
My Env. : Solaris/linux RH 7.x, Perl 5.6.1
Is there a way to enter another machine as a differen user and run a script?
I don't mind even something like 'rsh'.
Thanks!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
mario kulka wrote:
> hi,
> My form asks for the time in the format hh? mm? am/pm?
> However before I combine it all into one value (so I can insert it
> into my MySQL table) I would like to change the format to military
> time. I thought I could simply add 12 to the "hh" value when "am/pm"
> is pm,
Hi All!
Is there a way to login to a UNIX system, run an application and retrieve a
file written by that application using Perl from a Windows system?
thanks,
Prachi.
_
The new MSN 8: smart spam protection and 2 months FREE*
h
>
> Dan Muey wrote:
> > To answer my own questions :
> >>
> >>
> >> I have 2 questions about this chunk of code I'm trying to
> get to work
> >> :: I understand that Net::FTP 's stor ...
> >>
> >> Tells the server to store a new file under the name file.
> If the user
> >> calls either pasv
hi,
My form asks for the time in the format hh? mm? am/pm?
However before I combine it all into one value (so I can insert it into my
MySQL table) I would like to change the format to military time. I thought I
could simply add 12 to the "hh" value when "am/pm" is pm, which works fine
except for
Dan Muey wrote:
> To answer my own questions :
>>
>>
>> I have 2 questions about this chunk of code I'm trying to get
>> to work :: I understand that Net::FTP 's stor ...
>>
>> Tells the server to store a new file under the name file. If
>> the user calls either pasv or port,
>> returns true or fal
Thanks! I'll give her a study and try!
>
>
> Hi Dan.
>
> Dan Muey wrote:
> > I have 2 questions about this chunk of code I'm trying to
> get to work
> > ::
> > I understand that Net::FTP 's stor ...
> >
> > Tells the server to store a new file under the name file.
> If the user
> > calls ei
Hi Dan.
Dan Muey wrote:
> I have 2 questions about this chunk of code I'm trying to get to work
> ::
> I understand that Net::FTP 's stor ...
>
> Tells the server to store a new file under the name file. If the user
> calls either pasv or port,
> returns true or false. Otherwise, returns a referen
>
>
> Dan Muey wrote:
>
> > I'm tryin got find the quickest way to creat a file and write to it.
> >
> > I know I can do
> > open
> > print FILEHANDLE $stuff;
> > close...
> > and perhaps ad some flocks for good measure
> >
> > what I'm wondering is if there is a one line way to do it
To answer my own questions :
>
>
> I have 2 questions about this chunk of code I'm trying to get
> to work :: I understand that Net::FTP 's stor ...
>
> Tells the server to store a new file under the name file. If
> the user calls either pasv or port,
> returns true or false. Otherwise, retu
Dan Muey wrote:
> I'm tryin got find the quickest way to creat a file and write to it.
>
> I know I can do
> open
> print FILEHANDLE $stuff;
> close...
> and perhaps ad some flocks for good measure
>
> what I'm wondering is if there is a one line way to do it
> something like
>
> createf
hi,
I'm trying to retrive the id number ($ad_id) of the record I just entered:
...
$sth = $dbh->do (qq{INSERT INTO $table..."my record"
$sth = $dbh->prepare ("SELECT LAST_INSERT_ID() FROM $table");
$sth -> execute();
$ad_id = $sth->fetchrow_array();
$sth->finish();
...
The above works fine and g
Oops, hit send by mistake. This problem all seems to be about mistakes...
Thanks to all who replied.
> You have three different hashes in use. Look:
I did indeed have 3 hash tables... Duh (Must have been Friday afternoon).
The central problem was calling '&{${$date_format{$format}}{now}}()'
i
Gary fung wrote:
>
> I am now implementing a Perl program for data-mining. My program includes
> the using of DBI (ODBC). When I used small amount of testing data(within
> hundreds records), the program can run successfully. However, when I tried
> a large amount of data(hundred thousands of reco
I'm tryin got find the quickest way to creat a file and write to it.
I know I can do
open
print FILEHANDLE $stuff;
close...
and perhaps ad some flocks for good measure
what I'm wondering is if there is a one line way to do it
something like
createfile("filename.txt",$content);
somethin
I have 2 questions about this chunk of code I'm trying to get to work ::
I understand that Net::FTP 's stor ...
Tells the server to store a new file under the name file. If the user calls either
pasv or port,
returns true or false. Otherwise, returns a reference to a Net::FTP::dataconn object.
Thanks to all who replied.
|-+>
| | "Rob Dixon" |
| | <[EMAIL PROTECTED]|
| | m.co.uk> |
| ||
| | 02/07/2003 05:09 |
| |
Wow, that's a big CC list.
Anyhoo, it looks like TieRegistry will do some of what you want, and you
should also take a look at the following modules:
Win32::AdminMisc (http://www.roth.net/perl/adminmisc)
Win32::Lanman (search on CPAN for JHELBERG)
Win32::NetAdmin (you probably already have it)
Hi all
This is what I have been work on over the weekend and a bit more and now it
works so here it is. Please comment on it. As you might see I my develop a
simple Intrusion Detection System I will be adding more signatures in time
and there is a sensor for it that collects packets of the wire
On Mon, 10 Feb 2003 12:41:57 +0100, [EMAIL PROTECTED] (Angerstein)
wrote:
>If I need an alarm signal alarm(), in less than 1 second what can I do?
Interestingly enough, this just showed up on perlmonks this morning.
http://www.perlmonks.org/index.pl?node_id=23402
Simultaneous alarms under 1 sec
On Sun, 9 Feb 2003 11:45:56 -0600, [EMAIL PROTECTED] (Ktb) wrote:
>Is there any function that places perl code from a file into a program
>as if it was just part of the program file itself?
>
>Something like:
>
>file
>**
>Hello World.
>**
>
>program
>$file = slurp('file');
Try using the Win32::AdminMisc module from www.roth.net
In there, there's a SetPassword function that works nicely.
-Original Message-
From: Thomas Browner [mailto:[EMAIL PROTECTED]]
Sent: Friday, February 07, 2003 11:50 AM
To: [EMAIL PROTECTED]
Subject: changing passwords on nt
Is ther
Benjamin Jeeves wrote:
> Thank You Rob you have been a great help but work it out now
I'm glad to hear it. You might like to post your working version
for the group to look over. You will teach others something, and
you may find that people can make useful comments.
Well done Benjamin.
Rob
-
Hi all.
Just a warning about about a gotcha I just came across.
When processing HTML documents, beware that
or ISO \xA0 isn't matched by regex /\s/. Unless anyone
knows how to persuade it to do so?
Cheers,
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail:
On Sun, 9 Feb 2003 19:23:16 +0100, [EMAIL PROTECTED] (Anthony) wrote:
>Hi,
>
>But like i said on my second post i wanted to learn how to receive message
>from pipe.
OK, here are two simple scripts which should show you the idea.
One is a reader and one is a writer. Always start and stop the
read
Hi All
First Of all - Thanks to everybody for the gr8 help we novices are receiving
from you perl
experts & sorry to those who helped me & I didn't even pay gratitude or
thanks.
now coming to the problem - I need the follwoing info on win32 ( which i am
getting in unix systems)
I want that afte
On Sat, 08 Feb 2003 21:37:40 -0800, Patricia Hinman wrote:
> Does anyone know how to use a zip utility in an
> installation script. I would like to create an
> installation script for a program I've written. My
> only hurdle is learning how to unpack the zip file.
> I've heard of gunzip, can I
On Sun, 09 Feb 2003 12:54:51 -0500, Wiggins D'Anconia wrote:
> ktb wrote:
>> Is there any function that places perl code from a file into a program
>> as if it was just part of the program file itself?
>>
>
> perldoc -f use
> perldoc -f require
> perldoc -f eval
>
Don't forget
perldoc -f do
>
See below.
Beau E. Cox wrote:
> Hi -
>
>> From: R. Joseph Newton [mailto:[EMAIL PROTECTED]]
>> Subject: Re: Removing duplicates from an array
>>
>> Troy May wrote:
>>
>>> Hello,
>>>
>>> What's the best and cleanest way to remove duplicates from an array? I
>>> have an array that reads entries
Thank You Rob you have been a great help but work it out now
On Monday 10 Feb 2003 2:39 pm, Benjamin Jeeves wrote:
> On Monday 10 Feb 2003 11:57 am, Rob Dixon wrote:
>
> Hope you do not mind in helping me out but have try what you put below with
> know luck. This is what I have do and try many wa
perldoc CPAN
[snip]
The interactive mode is entered by running
perl -MCPAN -e shell
which puts you into a readline interface. You will have the most fun if you
install Term::ReadKey and Term::ReadLine to enjoy both history and command
completion.
-Original Message-
From: Har
I am now implementing a Perl program for data-mining. My program includes the using of
DBI (ODBC). When I used small amount of testing data(within hundreds records), the
program can run successfully. However, when I tried a large amount of data(hundred
thousands of records), it displays a messa
On Monday 10 Feb 2003 11:57 am, Rob Dixon wrote:
Hope you do not mind in helping me out but have try what you put below with
know luck. This is what I have do and try many ways
sub main_prog
{
my $counter = 0;
my $counter1 = 0;
$filepos = tell FILEIN;
for(;;)
{
On Feb 10, Angerstein said:
>sub selfalarm {
> $waittime = @_;
Above is your problem. You are assigning the NUMBER of elements in @_ to
$waittime, not the first element. Use one of the following:
my $waittime = shift;
my ($waittime) = @_;
my $waittime = $_[0];
>$ppid = getppid();
>
John W. Krahn wrote:
> Rob Dixon wrote:
>>
>> Mike Garner wrote:
>>>
>>> if ($file) {
>>> my @fileparts=split(/\\/,$file);
>>> my $file_name=pop(@fileparts);
>>
>> my $file_name = (split '\', $file)[-1];
> ^^^
> That won't work because you are escaping the final
Rob Dixon wrote:
>
> Mike Garner wrote:
> >
> > if ($file) {
> > my @fileparts=split(/\\/,$file);
> > my $file_name=pop(@fileparts);
>
> my $file_name = (split '\', $file)[-1];
^^^
That won't work because you are escaping the final quote. Mike's regex
is corr
This is a FAQ :
C:\>perldoc -q alarm
Found in C:\Perl\lib\pod\perlfaq8.pod
How can I sleep() or alarm() for under a second?
If you want finer granularity than the 1 second that the sleep()
function provides, the easiest way is to use the select()
function as
Hi Mark.
Mark Vanmiddlesworth wrote:
> I want to feed the output of an "ls" command into a perl script and
> store it as a variable, but I can't seem to figure out how to do this.
> How can I get this working?
Unless you have a good reason to use 'ls', you may well be better
off doing it within P
Hi Mike.
Mike Garner wrote:
> Hello all-
> I'm trying to write a script that will upload a file from a web page
> and store that file on the web server. I've snipped out the piece of
> code below that's supposed to do this for me. This is running under
> use CGI ':standard'; use strict; and use w
Original Message
Subject: Re: Mysql lib
Date: Sun, 9 Feb 2003 20:53:34 -0500
From: "Bob Showalter" <[EMAIL PROTECTED]>
To: "reavey" <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>
References: <[EMAIL PROTECTED]>
reavey wrote:
I'm interested in libraries or procedures which can prod
Benjamin Jeeves wrote:
> It still add record that it found on the first pass though the while
> loop to my database what I need is some way to mark my file to the
> point that it get to so it will not find a dupluted of the some
> record as the file grows. ant ideas on how I do that.
It sounds as
Hello,
I have aquestions.
If I need an alarm signal alarm(), in less than 1 second what can I do?
Would that work?
sub selfalarm {
$waittime = @_;
if ($pid = fork){
} else {
$ppid = getppid();
select (undef,undef,undef, $waittime);
kill 14 => ppid;
}
}
SIG{ALRM} = su
PLS DON't OPEN mail with sub - ANTECEDENTES ACADMICOS EDUCACIN BSICACompleta
from some Marcos Contreras <[EMAIL PROTECTED]> - its virus infected
I don't know from where i got this mail -
although successfully removed in my system .
pls fwd it to other lists - if feel so
regards
Pradeep
--
Hi Marc,
Any chance of seeing some code/data?
If you're chomping the input, and as output you have
print $prefix,$data,"\n";
or
print "$prefix$data\n";
then something must be happening to your $prefix value; either that, or maybe
you've got another print statement somewhere. Maybe if your "
100 matches
Mail list logo
