[28503] in Perl-Users-Digest
Perl-Users Digest, Issue: 9867 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Oct 19 14:05:49 2006
Date: Thu, 19 Oct 2006 11:05:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 19 Oct 2006 Volume: 10 Number: 9867
Today's topics:
CGI on NT help! <sadmachines0@yahoo.com>
Re: CGI on NT help! <mritty@gmail.com>
Re: CGI on NT help! <glex_no-spam@qwest-spam-no.invalid>
Re: FTP to a windows file share? <ThomasKratz@REMOVEwebCAPS.de>
Re: FTP to a windows file share? <scobloke2@infotop.co.uk>
how to do programming in perl in windows <shashichinnakar@gmail.com>
Re: how to do programming in perl in windows <mritty@gmail.com>
Re: how to do programming in perl in windows <glex_no-spam@qwest-spam-no.invalid>
Re: how to do programming in perl in windows <glex_no-spam@qwest-spam-no.invalid>
Re: I have no problems eating cereal...after it softens <quetzalcotl@consultant.com>
Re: I have no problems eating cereal...after it softens <bwilkins@gmail.com>
Re: Matching umlauts <josef.moellers@fujitsu-siemens.com>
Re: modify posting guidelines to allow MIME charset=utf <tzz@lifelogs.com>
Re: Perl and Dos Batch File Create <veatchla@yahoo.com>
Re: Returning to beginning of current line with print() <nospam@thanksanyway.org>
Re: Returning to beginning of current line with print() <DJStunks@gmail.com>
Re: Returning to beginning of current line with print() <DJStunks@gmail.com>
Re: Returning to beginning of current line with print() <nospam@thanksanyway.org>
Re: unable to calculate large file size xhoster@gmail.com
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 19 Oct 2006 09:27:42 -0700
From: "Scott Trinh" <sadmachines0@yahoo.com>
Subject: CGI on NT help!
Message-Id: <1161275261.950530.63240@h48g2000cwc.googlegroups.com>
I'm running an NT4 server with IIS4 (I know, I know... Get linux. Well,
it's unfortunately not my call... yet), and I'm have a hard time
getting all of the *nix CGI code around to work on this machine.
Obviously there are huge differences between the two, but after two
days of Googling around trying to find the answers, I figured I'd post
here.
I'm basically trying to get a file from the input type="file". I've
downloaded 5 or so different piece of code, and tried them all every
which way, and still can't wrap my head around getting everything
straight for NT. If anyone has any insight into this, I'd love the
help.
Scott
------------------------------
Date: 19 Oct 2006 10:02:22 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: CGI on NT help!
Message-Id: <1161277342.485486.324760@f16g2000cwb.googlegroups.com>
Scott Trinh wrote:
> I'm running an NT4 server with IIS4 (I know, I know... Get linux. Well,
> it's unfortunately not my call... yet), and I'm have a hard time
> getting all of the *nix CGI code around to work on this machine.
> Obviously there are huge differences between the two, but after two
> days of Googling around trying to find the answers, I figured I'd post
> here.
>
> I'm basically trying to get a file from the input type="file". I've
> downloaded 5 or so different piece of code, and tried them all every
> which way, and still can't wrap my head around getting everything
> straight for NT. If anyone has any insight into this, I'd love the
> help.
You have given no information of any kind that could be useful to
debugging your problem.
At the absolute *least*, we need to see:
A) A short-but-complete script that demonstrates the error
B) A description of the results
C) Any warnings or errors that are printed, both to the server log and
to the browser.
This is, of course, assuming your CGI script is written in Perl. If
it's not, you're very much in the wrong group.
Paul Lalli
------------------------------
Date: Thu, 19 Oct 2006 12:04:54 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: CGI on NT help!
Message-Id: <4537afe9$0$601$815e3792@news.qwest.net>
Scott Trinh wrote:
> I'm running an NT4 server with IIS4 (I know, I know... Get linux. Well,
> it's unfortunately not my call... yet), and I'm have a hard time
> getting all of the *nix CGI code around to work on this machine.
> Obviously there are huge differences between the two, but after two
> days of Googling around trying to find the answers, I figured I'd post
> here.
>
> I'm basically trying to get a file from the input type="file". I've
> downloaded 5 or so different piece of code, and tried them all every
> which way, and still can't wrap my head around getting everything
> straight for NT. If anyone has any insight into this, I'd love the
> help.
If you could provide any insight as to the code you've tried, such as a
complete example, it'd help much more. There shouldn't be much, if any,
difference due of the OS.
You could also look at CGI::UploadEasy:
http://search.cpan.org/~gunnar/CGI-UploadEasy-0.11/UploadEasy.pm
------------------------------
Date: Thu, 19 Oct 2006 15:18:36 +0200
From: Thomas Kratz <ThomasKratz@REMOVEwebCAPS.de>
Subject: Re: FTP to a windows file share?
Message-Id: <45377b2b$0$31174$bb690d87@news.main-rheiner.de>
Ian Wilson wrote:
> Brian Wilkins wrote:
>> MattJ83 wrote:
>>> The trouble is i don't think the file share format '\\ukbr1234\share'
>>> is accepted by the perl script.....
>>
>> open(FILE, "\\ukbr1234\share\test");
>>
>
> In that double-quoted string constant, \s means any whitespace character
> doesn't it?
>
> I'd use single quotes: '\\ukbr1234\share\test'
Close but no cigar.
You'll need to double the first backslashes, because a double backslash -
being the escape character - evaluates to a single one even in single quotes.
This would be: '\\\\ukbr1234\share\test'
Even uglier: a closing backslash needs to be escaped at the end of a
single quoted string because it would be interpreted as an escaped single
quote otherwise, which results in an error complaining about an
unterminated string.
E.g. '\\\\ukbr1234\share\test\\'
> I think forward slashes (/) should work and are preferable since you can
> safely interpolate variables into a string containing them (after
> changing quotes).
>
> open my $fh, '<', '//ukbr1234/share/test'
> or die "can't open file because $!";
ACK as long as you keep in mind that feeding paths containing forward
slashes to external programs via system() might cause problems. Applying a
s!/!\\!g on the string might be neccesary beforehand.
Thomas
--
$/=$,,$_=<DATA>,s,(.*),$1,see;__END__
s,^(.*\043),,mg,@_=map{[split'']}split;{#>J~.>_an~>>e~......>r~
$_=$_[$%][$"];y,<~>^,-++-,?{$/=--$|?'"':#..u.t.^.o.P.r.>ha~.e..
'%',s,(.),\$$/$1=1,,$;=$_}:/\w/?{y,_, ,,#..>s^~ht<._..._..c....
print}:y,.,,||last,,,,,,$_=$;;eval,redo}#.....>.e.r^.>l^..>k^.-
------------------------------
Date: Thu, 19 Oct 2006 15:41:42 +0100
From: Ian Wilson <scobloke2@infotop.co.uk>
Subject: Re: FTP to a windows file share?
Message-Id: <IMydnS5FSfA6E6rYnZ2dnUVZ8sidnZ2d@bt.com>
Thomas Kratz wrote:
> Ian Wilson wrote:
>
>> Brian Wilkins wrote:
>>
>>> MattJ83 wrote:
>>>
>>>> The trouble is i don't think the file share format '\\ukbr1234\share'
>>>> is accepted by the perl script.....
>>>
>>> open(FILE, "\\ukbr1234\share\test");
>>
>> I'd use single quotes: '\\ukbr1234\share\test'
>
> Close but no cigar.
>
> You'll need to double the first backslashes, because a double backslash
> - being the escape character - evaluates to a single one even in single
> quotes.
>
My mistake. No wonder I prefer forward slashes.
------------------------------
Date: 19 Oct 2006 10:00:36 -0700
From: "Jack" <shashichinnakar@gmail.com>
Subject: how to do programming in perl in windows
Message-Id: <1161277236.537764.182050@k70g2000cwa.googlegroups.com>
Hello all
I am a new perl programmer and i have been doing many programs
in perl o UNIX machine but im unable to run a program on my windows
using active perl and i have installed the active perl. Well im not
sure if i have followed the correct procedure to install active perl or
not. I would like to know how to install and then how to start perl
programming in windows
thanx
------------------------------
Date: 19 Oct 2006 10:04:30 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: how to do programming in perl in windows
Message-Id: <1161277470.404157.208640@h48g2000cwc.googlegroups.com>
Jack wrote:
> I am a new perl programmer and i have been doing many programs
> in perl o UNIX machine but im unable to run a program on my windows
> using active perl and i have installed the active perl. Well im not
> sure if i have followed the correct procedure to install active perl or
> not. I would like to know how to install and then how to start perl
> programming in windows
Download and install the MSI package for Windows from ActiveState.
Create your Perl program in whatever text editor you like. I prefer
Edit+ (http://www.editplus.com), but any text editor will do.
Save your program to some directory, and make sure you know what that
directory is.
Open a command prompt (Start->Run->cmd)
Change to the directory in which you saved your script.
Type the name of your script. If that doesn't execute it, you probably
have your file associations wrong. Fix them, but in the mean time,
type "perl " followed by the name of your script.
Paul Lalli
------------------------------
Date: Thu, 19 Oct 2006 12:07:24 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: how to do programming in perl in windows
Message-Id: <4537b080$0$601$815e3792@news.qwest.net>
Jack wrote:
> Hello all
> I am a new perl programmer and i have been doing many programs
> in perl o UNIX machine but im unable to run a program on my windows
> using active perl and i have installed the active perl. Well im not
> sure if i have followed the correct procedure to install active perl or
> not. I would like to know how to install and then how to start perl
> programming in windows
Maybe the documentation would be a good place? I comes with the
distribution, but if you want to read it online:
http://aspn.activestate.com/ASPN/Perl
------------------------------
Date: Thu, 19 Oct 2006 12:08:28 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: how to do programming in perl in windows
Message-Id: <4537b0c0$0$601$815e3792@news.qwest.net>
J. Gleixner wrote:
> Jack wrote:
>> Hello all
>> I am a new perl programmer and i have been doing many programs
>> in perl o UNIX machine but im unable to run a program on my windows
>> using active perl and i have installed the active perl. Well im not
>> sure if i have followed the correct procedure to install active perl or
>> not. I would like to know how to install and then how to start perl
>> programming in windows
>
> Maybe the documentation would be a good place? I comes with the
^It
> distribution, but if you want to read it online:
>
> http://aspn.activestate.com/ASPN/Perl
------------------------------
Date: 19 Oct 2006 08:01:22 -0700
From: "Ingo Menger" <quetzalcotl@consultant.com>
Subject: Re: I have no problems eating cereal...after it softens. Why is replacing a simple string so hard then?
Message-Id: <1161270082.156392.71130@i3g2000cwc.googlegroups.com>
samiam@mytrashmail.com wrote:
> No one at any time in this thread gave any substantive evaluation of my
> "Aren't unique identifiers workable, perhaps more readily identified
> than > upon >>?"
This is in fact unheard of, when everybody knows that all newsgroup
readers have the duty to answer stupid questions. Or is it?
> Instead, it's been "Our leaders say a thousand angle brackets are good
> for us and you better get in line for your helping too...or else."
Nobody said that.
> One good example from this academic subculture is the issue of
> Evolution. The majority of scientists and those in Academia regard
> Evolution as unquestionable fact.
Perhaps this points to the deeper reason why you don't understand.
The quoting conventions in usenet have not been mandated by a leader
(or a creator), they are the result of an evolutionary process.
This process still continues. Everybody refusing to do quoting right
will attrackt less and less readers and will get less and less answers,
up to a point where he could as well write his postings straight to
/dev/null. At this point even the dullest creationist will eventually
stop posting. This is how it should be, you see.
Consider a selling machine that sells coke for 0.35 ct., but,
unfortunately, only if you insert a quarter and a dime in that order.
If you insert a dime first, it will simply fall through. Suppose you
want a coke. What would you do?
a) After inserting a dime and recognizing that it won't work that way,
read the operating instructions, insert a quarter, a dime and going
away with what you wanted (the coke) or
b) cry loud about how unsatisfactory this machine is, write long
complaints to the company that placed it there, wherein you compare
them with NAZIs, etc., finally going away without a coke?
Well, the newsgroup is like a selling machine for answers. You insert
politeness and a question (in that order) and you'll get an answer.
------------------------------
Date: 19 Oct 2006 09:09:58 -0700
From: "Brian Wilkins" <bwilkins@gmail.com>
Subject: Re: I have no problems eating cereal...after it softens. Why is replacing a simple string so hard then?
Message-Id: <1161274198.108305.114510@f16g2000cwb.googlegroups.com>
Ingo Menger wrote:
> Well, the newsgroup is like a selling machine for answers. You insert
> politeness and a question (in that order) and you'll get an answer.
I think he is complaining about the Usenet conventions and how they
don't jive with what he believes to be true. To me, it is just easier
to get along and follow what is normal Usenet community procedure.
------------------------------
Date: Thu, 19 Oct 2006 15:16:54 +0200
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Matching umlauts
Message-Id: <eh7u3j$qka$1@nntp.fujitsu-siemens.com>
anno4000@radom.zrz.tu-berlin.de wrote:
> Josef Moellers <josef.moellers@fujitsu-siemens.com> wrote in comp.lang=
=2Eperl.misc:
>=20
>>fritz-bayer@web.de wrote:
>>
>>>Hi,
>>>
>>>I have to match words, which contains umlauts like =E4=F6=FC and also
>>>french and other ones.
>>>
>>>Is there a way to use regular expressions in such a way that those get=
>>>treated like their normal corresponding letters?
>>>
>>>In other words, that "M=FCnchen" =3D "Munchen" when I do a pattern mat=
ch
>>>with =3D~ ?
>>
>>Why should they be the same if they aren't?
>=20
>=20
> With that argument you'd also have to argue that m//i is useless. Afte=
r
> all "Tad" and "tad" aren't the same either. In the right context it ma=
y
> make perfect sense to have /M=FCnchen/ match "Munchen".
No. IMHO =FC and u are different characters with different pronunciation.=
See my example below (Agreed, in "Wenn hinter Fliegen Fliegen fliegen,=20
fliegen Fliegen Fliegen hinterher" there _is_ a definite difference=20
between "Fliegen" and "fliegen").
Outside of Germany, "=FC" may very well be "u", e.g. in Dutch (Ruud,=20
please correct me if I'm wrong) "=FC" would mean "a _u_ even if it would =
otherwise be coerced to the previous letter" ("reunie" might be=20
pronounced differently from "re=FCnie").
> I know of no feature that would automatically map an accented character=
> to its un-accented version. You'll have to come up with your own
> equivalence tables, probably in form of tr/// statements.
That would be the closest thing Fritz would get.
>>Why should M=FCnster in Northrhine-Westfalia be the same as Munster in =
>>Lower Saxony?
Josef, getting angry when his second name is spelt "Mollers" ;-)
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Thu, 19 Oct 2006 16:52:05 +0100
From: Ted Zlatanov <tzz@lifelogs.com>
Subject: Re: modify posting guidelines to allow MIME charset=utf8
Message-Id: <g693b9k9uca.fsf@lifelogs.com>
On 18 Oct 2006, merlyn@stonehenge.com wrote:
>>>>>> "Ted" == Ted Zlatanov <tzz@lifelogs.com> writes:
>
> Ted> Usenet is not a prison. comp.lang.perl.misc is not even moderated.
> Ted> Can you explain your analogy a little bit?
>
> The analogy is that *this* is not *yours* and not *mine*. *This* belongs
> to the people who run Usenet. Unless you're also in charge of a spool
> somewhere, you are *not* an admin and have *no* say about the format
> of the messages or even the charter. Even if you *are* in charge of
> a spool, you don't get interchange rights unless you play along well
> with the *collective* *anarchy* known as "Usenet".
I understand all that, but we are not "inmates." Both meanings of the
word in this context (lunatics and prisoners) don't sit well with the
"collective anarchy" image you mention, and I dislike the implications
of those meanings. Usenet is built on cooperation, not threats and
force.
> So, that's how it applies. You can vote all you want, but it's ultimately up
> to the people running the show, and that's NOT US in THIS GROUP. It's the
> people in news.admin. As far as I remember last time I looked, MIME is *not*
> acceptable, here or anywhere on Usenet except in groups that match
> "*.binaries.*".
MIME is de facto acceptable in comp.lang.perl.misc. MIME posts go
through every day, and I've never heard of a single one lost. Your
post, the one I'm quoting, it a MIME post:
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
If you have proof of your statement that MIME is not acceptable
here--Usenet Cabal meeting minutes, dropped posts, news admin
opinions, whatever, please cite them. I would really appreciate it.
Also note Ian Wilson's note--I did a similar search and came up blank.
Ted
------------------------------
Date: Thu, 19 Oct 2006 11:19:07 -0500
From: l v <veatchla@yahoo.com>
Subject: Re: Perl and Dos Batch File Create
Message-Id: <12jf9brev0fr35f@news.supernews.com>
banker123 wrote:
> l v wrote:
*AGAIN* WITH THE TOP POSTING. Stop top-posting and bottom-post in this
newsgroup!
>> banker123 wrote:
>>
>> top posting corrected again.
>>
>>> l v wrote:
>>>> banker123 wrote:
>>>>
>>>> top posting corrected.
>>>>
>>>>> David Peacock wrote:
>>>>>> banker123 <bradbrockman@yahoo.com> wrote:
>>>>>>> I am new to Perl and I am trying to use Perl to complete this task.
>>>>>> Welcome.
>>>>>>
>>>>>>> I have a source file that list the parameter that needs to be inserted
>>>>>>> into a batch file, as shown below the parameter needs to be inserted
>>>>>>> after JFCLIENT.EXE/f=********* followed by /n=001 the parameter is the
>>>>>> <snip>
>>>>>>
>>>> [snip]
>>>> > open (data, 'source data') or die ("Cannot Open");
>>>>
>>>> Is 'source data' your real file name? Tell die to give you more
>>>> information about why the open failed.
>>>> .... or die "Cannot open source data, $!";
>>>>
>>>>
>>>> > open (test, ">test.bat") or die ("Cannot Open");
>>>>
>>>> Improve your die as in above.
>>>> You initially stated that you need a batch file for each line in you
>>>> input. This will create 1 batch file with each command. Which do you
>>>> require? If 1 batch file per input line, then move the open() and
>>>> close() of $rec1 inside your loop below.
>>>>
>>>> > @array=<data>;
>>>>
>>>> Do not read the entire input file into memory unless the file is small.
>>>>
>>>> > foreach $line (@array)
>>>> Better to read directly from the input filehandle
>>>> while (my $line = <data>) {
>>>>
>>>> > {
>>>> > chop($line);
>>>> use chomp() to remove newline from the end of the line. chop() removes
>>>> the last character.
>>>>
>>>>
>>>> > ($rec1,$rec2,)=split(/\t/,$line);
>>>> > print test "\\CPC06LBA03S\APPS\FORMWARE\PROGRAMS\JFCLIENT.EXE /f=$rec2
>>>> > /n=001";
>>>> > }
>>>> >
>>>> >
>>>>
>>>> --
>>>>
>>>> Len
>> > You initially stated that you need a batch file for each line in you
>> > input. This will create 1 batch file with each command. Which do you
>> > require? If 1 batch file per input line, then move the open() and
>> > close() of $rec1 inside your loop below.
>> >
>> > I need 1batch file with each command.
>> > I also need that bathh file named using the $rec1.bat.
>> > Can you provide some more info on how and where to add the open in the
>> > loop?
>> > I am getting 1 batch file with each line and the bacth file is named
>> > $rec1.bat not what I want.
>> > Thanks!
>> >
>> >
>> >
>>
>> You would open and close your output file using the $rec1 as your
>> filename within the iterations for each line in your input file. Print
>> would be between the open and close. This is a common programming
>> concept regardless of the programming language. Being new to Perl
>> should not make you forget program logic.
>>
>> Remember to post your updated code for further assistance and please
>> don't top post in this NG.
>> --
>>
>> Len
>
> Current code currently outputs each line from source $rec2 to
> $rec1.bat. I would like to output each $rec2 to a unique batch file
> using the $rec2 variable as the filename.
>
> open (data, 'C:\Source.txt') or die ("Cannot Open");
> open (test, '>C:\$rec1.bat') or die ("Cannot Open");
>
> @array=<data>;
> foreach $line(@array)
> {
> chop($line);
> ($rec1,$rec2,)=split(/\t/,$line);
> print test "\\\\CPC06LBA03S\\APPS\\FORMWARE\\PROGRAMS\\JFCLIENT.EXE
> /f=$rec2 /n=001 \n";
> }
>
>
>
I see that you did not do any of the suggestions to improve your code.
Therefore, I'm not going to _give_ you the code. Looks like the only
line you modified was changing the output batch file name to $rec1.bat.
That's a good start.
So here are some questions for you to consider:
1. Has $rec1 been assigned a value when you open filehandle test?
2. Where has $rec1 been assigned a value?
--
Len
------------------------------
Date: Thu, 19 Oct 2006 08:11:22 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Returning to beginning of current line with print()?
Message-Id: <1161270679.708320@bubbleator.drizzle.com>
"Aukjan van Belkum" <aukjan@vanbelkum.no.spam.nl> wrote:
> It is quite elementary .. but you already knew that ;-)
>
> use "\r" at the end of a print statement (assuming you're on unix):
>
> print "Count: $_\r" for ( 0 .. 10000000 );
Ugh. Any idea how I can get carriage return behavior in Windows?
Thanks
-Mark
------------------------------
Date: 19 Oct 2006 08:19:30 -0700
From: "DJ Stunks" <DJStunks@gmail.com>
Subject: Re: Returning to beginning of current line with print()?
Message-Id: <1161271170.445817.116460@k70g2000cwa.googlegroups.com>
Mark wrote:
> "Aukjan van Belkum" <aukjan@vanbelkum.no.spam.nl> wrote:
> > It is quite elementary .. but you already knew that ;-)
> >
> > use "\r" at the end of a print statement (assuming you're on unix):
> >
> > print "Count: $_\r" for ( 0 .. 10000000 );
>
> Ugh. Any idea how I can get carriage return behavior in Windows?
the suggestion works fine on windows. don't forget to unbuffer output.
C:\tmp>perl -e "$|++; printf qq[$_\r] and sleep 1 for 1..5"
-jp
------------------------------
Date: 19 Oct 2006 08:21:46 -0700
From: "DJ Stunks" <DJStunks@gmail.com>
Subject: Re: Returning to beginning of current line with print()?
Message-Id: <1161271305.976385.112920@i42g2000cwa.googlegroups.com>
DJ Stunks wrote:
> Mark wrote:
> > "Aukjan van Belkum" <aukjan@vanbelkum.no.spam.nl> wrote:
> > > It is quite elementary .. but you already knew that ;-)
> > >
> > > use "\r" at the end of a print statement (assuming you're on unix):
> > >
> > > print "Count: $_\r" for ( 0 .. 10000000 );
> >
> > Ugh. Any idea how I can get carriage return behavior in Windows?
>
> the suggestion works fine on windows. don't forget to unbuffer output.
>
> C:\tmp>perl -e "$|++; printf qq[$_\r] and sleep 1 for 1..5"
-------------------------------^
and feel free to ignore that 'f' lol
-jp
------------------------------
Date: Thu, 19 Oct 2006 09:39:30 -0700
From: "Mark" <nospam@thanksanyway.org>
Subject: Re: Returning to beginning of current line with print()?
Message-Id: <1161275961.952798@bubbleator.drizzle.com>
"DJ Stunks" <DJStunks@gmail.com> wrote:
>
> don't forget to unbuffer output.
Ah. Thanks.
------------------------------
Date: 19 Oct 2006 15:41:16 GMT
From: xhoster@gmail.com
Subject: Re: unable to calculate large file size
Message-Id: <20061019114232.315$6p@newsreader.com>
himagauri@gmail.com wrote:
> The OS is Suse Linux and perl version is 5.8.3.
>
> Point is that I would later have to work on files >16 GB. Hence I
> haven't tested for intermediate values.
The point is that to fix a problem it helps to know what the problem is.
Testing for intermediate sizes might help figure that out.
Since you are using linux, you probably have access to strace. strace
a simple perl program that does nothing but run -s on a large file and
see where it is spending its time.
$ strace perl -le 'print -s "foo2"'
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 9867
***************************************
