Re: file uploader

2009-08-03 Thread Randal L. Schwartz
> "Octavian" == Octavian Rasnita writes: Octavian> But if you say that Apache is the one that cause the problem, can I Octavian> change some settings in order to make it able to handle big file Octavian> uploads? (Or it has a hard-coded limitation?) You don't want to do that. You really do

Re: file uploader

2009-08-03 Thread Octavian Rasnita
From: "Randal L. Schwartz" "Octavian" == Octavian Râşniţă writes: Octavian> I was recommended that I shouldn't upload such big files using HTTP, Octavian> but it would be an easier solution if it would be possible, and I Octavian> would like to be able to use HTTP for uploading files up to

Re: file uploader

2009-08-03 Thread Randal L. Schwartz
> "Octavian" == Octavian Râşniţă writes: Octavian> I was recommended that I shouldn't upload such big files using HTTP, Octavian> but it would be an easier solution if it would be possible, and I Octavian> would like to be able to use HTTP for uploading files up to 2 GB. Apache (rightfully)

Re: Inverting a hash safely

2009-08-03 Thread Shawn H. Corey
Jenda Krynicky wrote: From: "Shawn H. Corey" push @{ $r{$h{$_}} }, $_ for keys %h; # one line :) Is it simple enough so that you immediately know what does it do? I guess not. IMHO it's complex enough to warrant being moved to a named subroutine. Especially since it forces you to write th

Re: Inverting a hash safely

2009-08-03 Thread Jenda Krynicky
From: "Shawn H. Corey" > Jenda Krynicky wrote: > > And if you feel like it, create a function that reverses > > > > (a => 1, b => 3, c => 1) => (1 => ['a','c'], 2 => ['b']) > > > > That's something that's not a SIMPLE oneliner. Even though of course > > it's not too complex either. > > I thin

Re: better readline?

2009-08-03 Thread Chas. Owens
On Mon, Aug 3, 2009 at 18:43, Bryan R Harris wrote: > > > I'm writing a little script where the user enters some data via keyboard. > > The script in some cases can guess what the user will want to enter, but I'd > like the user to be able to override what the computer has guessed. > > For example,

Re: Inverting a hash safely

2009-08-03 Thread Uri Guttman
> "EA" == Ed Avis writes: EA> foreach my $k (sort keys %hash) { why the sort? uri -- Uri Guttman -- u...@stemsystems.com http://www.sysarch.com -- - Perl Code Review , Architecture, Development, Training, Support -- - Free Perl Training --- http://p

Re: Inverting a hash safely

2009-08-03 Thread Shawn H. Corey
Jenda Krynicky wrote: And if you feel like it, create a function that reverses (a => 1, b => 3, c => 1) => (1 => ['a','c'], 2 => ['b']) That's something that's not a SIMPLE oneliner. Even though of course it's not too complex either. I think it's simple enough: #!/usr/bin/perl use strict;

better readline?

2009-08-03 Thread Bryan R Harris
I'm writing a little script where the user enters some data via keyboard. The script in some cases can guess what the user will want to enter, but I'd like the user to be able to override what the computer has guessed. For example, the computer thinks the user will enter "8/2 Updated database",

Re: Inverting a hash safely

2009-08-03 Thread Jenda Krynicky
From: Ed Avis > Jenda Krynicky Krynicky.cz> writes: > > >> my %hash = (a => 1, b => 2); > >> my %reverse = safe_hash_invert %hash; # works fine > >> > >> $hash{c} = 1; > >> %reverse = safe_hash_invert %hash; # throws an error > > >I don't think there is and I don't think there'

Re: Inverting a hash safely

2009-08-03 Thread Ed Avis
Jenda Krynicky Krynicky.cz> writes: >> my %hash = (a => 1, b => 2); >> my %reverse = safe_hash_invert %hash; # works fine >> >> $hash{c} = 1; >> %reverse = safe_hash_invert %hash; # throws an error >I don't think there is and I don't think there's a need. > >my %hash = (a => 1,

Re: Help on regular expression !!

2009-08-03 Thread John W. Krahn
jet speed wrote: On Mon, Aug 3, 2009 at 5:45 PM, John W. Krahn wrote: jet speed wrote: Hi John, Thanks for your help, Much appreciated. Please could you also refer any good reference for Regular expression for a beginer like me, would be great. Have you read the documentation that comes w

Re: Help on regular expression !!

2009-08-03 Thread jet speed
On Mon, Aug 3, 2009 at 5:45 PM, John W. Krahn wrote: > jet speed wrote: > >> >> Hi John, Thanks for your help, Much appreciated. Please could you also >> refer any good reference for Regular expression for a beginer like me, >> would >> be great. >> > > Have you read the documentation that comes

Re: Help on regular expression !!

2009-08-03 Thread John W. Krahn
jet speed wrote: Hi John, Thanks for your help, Much appreciated. Please could you also refer any good reference for Regular expression for a beginer like me, would be great. Have you read the documentation that comes with Perl? perldoc perlrequick perldoc perlretut perldoc perlre John --

Re: Help on regular expression !!

2009-08-03 Thread jet speed
On Mon, Aug 3, 2009 at 4:00 PM, John W. Krahn wrote: > jet speed wrote: > >> Guys, >> > > Hello, > > I am new to perl, I am having trouble capturing the required output from >> the command, with my limited knowlege i tried to put something togather. >> not >> sure how to proceed beyond. >> > > I

Re: Automating the resetting of Power Options

2009-08-03 Thread Kevin Safford
"Wagner, David --- Senior Programmer Analyst --- CFS" wrote: > So does anyone have a Perl script/module that will allow me to reset > the Power options automatically? I would perfer to be abel to set > what I want it to be, so it can be done automatically without my > intervention ( I can handle fi

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Jenda Krynicky
From: Peter Daum > I occasionally have to write Perl scripts that should behave the same on > Unix- and DOS-like Systems. One little problem I encounter there is: > > For quick hacks, the "while(<>)" mechanism is very handy, because it > saves a lot of typing. On Unix, I can call a script as a fi

Re: Inverting a hash safely

2009-08-03 Thread Jenda Krynicky
From: Ed Avis > My question is, does there exist a 'safe hash invert' function in some CPAN > module? I was imagining something like > > my %hash = (a => 1, b => 2); > my %reverse = safe_hash_invert %hash; # works fine > > $hash{c} = 1; > %reverse = safe_hash_invert %hash; # thr

Re: Help on regular expression !!

2009-08-03 Thread John W. Krahn
jet speed wrote: Guys, Hello, I am new to perl, I am having trouble capturing the required output from the command, with my limited knowlege i tried to put something togather. not sure how to proceed beyond. In a regular expression, when you want to capture part of a pattern you have to e

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread John W. Krahn
Peter Daum wrote: Shawn H. Corey wrote: I've always used: beg...@argv=glob(@ARGV)} ... I still need at least: BEGIN{ @ARGV=map { glob($_) } @ARGV } but that's already much shorter - thanks :-) Unfortunately, this leads right to the next problem: I also need "binmode" to turn off cr/lf con

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Peter Daum
Shawn H. Corey wrote: Peter Daum wrote: Unfortunately, this leads right to the next problem: I also need "binmode" to turn off cr/lf conversion on DOS; with "while (<>)" I don't know where to do this anymore, because AFAIK, this has to be done after open, but before the 1st I/O; now before th

RE: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Bob McConnell
From: Peter Daum > > I occasionally have to write Perl scripts that should behave the same on > Unix- and DOS-like Systems. One little problem I encounter there is: I am using Camelbox Perl on WinXP. This is my command line for unit tests: perl -MTest::Harness -e "@ARGV= map glob, @ARGV if $^O =

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Shawn H. Corey
Peter Daum wrote: Shawn H. Corey wrote: I've always used: beg...@argv=glob(@ARGV)} ... I still need at least: BEGIN{ @ARGV=map { glob($_) } @ARGV } but that's already much shorter - thanks :-) Unfortunately, this leads right to the next problem: I also need "binmode" to turn off cr/lf con

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Peter Daum
Ed Avis wrote: Peter Daum yahoo.de> writes: With more recent Perl versions, when a script is called with '*.xyz' it will just try to open '*.xyz' and fail. What version of Perl do you have? (perl -V) ... when I 1st encountered this problem, it was with ActivePerl 5.8 generally, I try t

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Peter Daum
Shawn H. Corey wrote: I've always used: beg...@argv=glob(@ARGV)} ... I still need at least: BEGIN{ @ARGV=map { glob($_) } @ARGV } but that's already much shorter - thanks :-) Unfortunately, this leads right to the next problem: I also need "binmode" to turn off cr/lf conversion on DOS; wit

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Ed Avis
Peter Daum yahoo.de> writes: >With more recent Perl versions, when >a script is called with '*.xyz' it will just try to open '*.xyz' and >fail. What version of Perl do you have? (perl -V) -- Ed Avis -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail:

Re: while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Shawn H. Corey
Peter Daum wrote: Is all this really necessary, or is there a better / more elegant way? I've always used: beg...@argv=glob(@ARGV)} -- Just my 0.0002 million dollars worth, Shawn Programming is as much about organization and communication as it is about coding. My favourite four-lett

while (<>) and wildcards on DOS/Windows

2009-08-03 Thread Peter Daum
Hi, I occasionally have to write Perl scripts that should behave the same on Unix- and DOS-like Systems. One little problem I encounter there is: For quick hacks, the "while(<>)" mechanism is very handy, because it saves a lot of typing. On Unix, I can call a script as a filter, with filenames o

Re: localtime() oddities

2009-08-03 Thread Shawn H. Corey
Roman Makurin wrote: Could someone explain me whats goin on :) Do you have Daylight Saving Time? Are both machines configured for it? -- Just my 0.0002 million dollars worth, Shawn Programming is as much about organization and communication as it is about coding. My favourite four-l

Inverting a hash safely

2009-08-03 Thread Ed Avis
The standard answer on how to invert a hash, so that keys become values and vice versa, is to use reverse: my %reversed = reverse %hash; The standard answer also mentions some caveats, most importantly that if the original hash is not one-to-one, then some entries will be lost: use Data:

localtime() oddities

2009-08-03 Thread Roman Makurin
Hi All! I have a strange problem. Here is sample code: perl -MPOSIX -le 'print scalar localtime(POSIX::mktime(0,30,14,03,07,109))' When i test it on my laptop, everything goes fine, its output is: Mon Aug 3 14:30:00 2009 But when im trying to execute it on freebsd server it gives me following

Help on regular expression !!

2009-08-03 Thread jet speed
Guys, I am new to perl, I am having trouble capturing the required output from the command, with my limited knowlege i tried to put something togather. not sure how to proceed beyond. What i am trying to achieve for certain drives ex : B3494_901, B3494_102 from the outputlist is to find the ind