i'm taking an intro to programming with PERL class. one of the problems
asks us to do the following:
show how to creat a random number inthe following range:
5 to 15
-10 to 20
the documentation for rand and srand are not too useful. Any help would be
great.
thanks,
eric
--
To unsubs
eem to find a place to report Generic bugs like this (if it
turned out to be one)?
Cheers
Eric Aksomitis
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
if you're running Apache, look into .htaccess for password protecting
certain parts of your site.. no reason to make something harder than it
has to be.
~Eric
On Monday, January 7, 2002, at 07:58 PM, Luinrandir Hernson wrote:
> ect part of my website.
> I have the passwor
Hello all,
I have a directory of various .jpg and .gif files - and would like to
resize to them to a smaller size all at one time - is there a perl module
or any hints that could help me out? Thanks in advanced.
~Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands
Awesome! is there anyway to do this using GD also? image magick wont seem
to install from CPAN - keeps returning bad make status.
Thanks again,
~Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
uploads "image.jpg" it gets stored
in a variable - from that how could I convert it to image[1].jpg or
something to that extent? thanks for you help.. I sure hope I don't sound
stupid. heh! thanks again
~Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands,
..
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
pe as local variables.
Thanks,
Eric
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
On Feb 6, 11:01 pm, jeffp...@netzero.net (Jeff Peng) wrote:
> 在 2010-02-05五的 06:27 -0800,Eric写道:
>
> > I have a program that requests many config values from an ini file
> > using Config::IniFiles. I import all of these values into my main::
> > script but it's p
Ok,
I installed Perl, when I search for perl I get /usr/bin/perl, but when I
include #!/usr/bin/perl in my source I still cant exicute it without;
perl myProg
and I have also chmod 751 myProg I am using Linux (RH7.1) what
am I missing?
Thanks
Eric
Damn it Scotty I need more power
Hi everyone,
does anyone know how to pass in parameters from command line to a perl
script?
Is it the same as C++ where i specify an ARGV[ ] and ARGC value or I use
the @ARGV?
Thanks
eric
At 16:39 2001.06.19, Jeff 'japhy' Pinyan wrote:
>On Jun 19, Bob Mangold said:
>
>>I may have a bug somewhere in my code, but I can't find it. Before I
>>look again though please answer this for me.
>
>>my ($line) = "hello";
>>foreach $line (<>){
>> . whatever
>>}
>>print $line;
>>
>>Should
At 00:23 2001.06.27, Jeff 'japhy' Pinyan wrote:
>On Jun 27, Walt Mankowski said:
>
>>On Tue, Jun 26, 2001 at 10:53:12PM -0500, Steve Howard wrote:
>>> I would suggest using the localtime function. That will work regardless of
>>> OS.
>>>
>>> ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $
At 01:40 2001.07.01, Jeff 'japhy' Pinyan wrote:
>On Jun 30, Sanjeeb Basak said:
>
>>I want to perform a simple split operation, but can't get the regular expr
>>working. Can anybody help me on this?
>>
>>my $line from a file read is:
>>xyz abc 12sd "pqr stz" dfg (delimited by blank char).
>>
>>I'm
ode blocks(procedures
and functions instead of a simple insert statement) inside perl script?
Thanks,
Eric
*
*Eric T. Wang *
*Bioinformatic Support and DNA Sequencing Core SRA *
*University of
Thanks for the tip,
But what if I am using Microsoft SQL server 7?
is there a way to do this?
eric
-Original Message-
From: dave hoover [mailto:[EMAIL PROTECTED]]
Sent: Thursday, July 05, 2001 12:43 PM
To: Eric Wang; [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: creating columns
What does
$pid = open(CMD, "-|")
mean? I assume this is forking a process, but I have not seen "-|" before.
Has anybody come across this kind of perl command before?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I've just seen a strange thing. I made up a simple perl program:
#!/usr/local/perl -w
my ($summary_data);
$summary_data->{'express'} = "blahblahblah\n";
print $summary_data->{'express'};
Notice that $summary_data is not initialized, so when used as a reference,
it
gt; chirag
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
>
Eric Wisti
Kinetic, Inc.
(651) 848-0477
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
At 18:25 2001.08.12, Birgit Kellner wrote:
>Hm, what's the shortest way to do this: I have a hash where one, and only one, key
>begins with a number, I don't know its value and want to assign this value to a
>variable.
>
>If I were to do a foreach loop, I'd do this (presuming that %hash is alrea
Hi guys,
Got a quick question.
If I let @foo = "some string";
can I access say the "t" in this string by using $foo[6] ?
thanx
eric
*****
*Eric T. Wang *
*Bioinform
Hi guys,
I have a quick question, how do I enable my webpage to be able to browse
the users computer and allow him/her to upload files into the server?
is there a particular CGI module? or what's the deal?
Thanks!!
Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comman
[2]=1
?
help
Thanks
Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi people, just need a quick reference.
how do i split on underscore?( _ ) and on hyphen? ( - )?
i tried split(/\_/, $var) but didn't work
and I also tried split ('_', $var) but didn't work also.
HELP...
Thanks
Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For ad
he quote character
before the word titlepic (that's what I think the error log on the server
is telling me). That quote is closing off an argument, right?
How do I nest the quoted material within the other quotes? I've tried qq
and \Q amongst other things, but I don't know what I'm doing.
Thanks for any tips,
Eric
At 16:42 2001.06.03, you wrote:
>hello all-
>quick question that is definitely from a neophyte.
>
>i am currently using:
>
>sub begin {
> print "Content-type: text/html\n\n";
> print "\n";
> print "Control Panel\n";
> print "\n";
>}
>
>sub footer {
>print "\n";
>print "\n";
>}
>
>
>wit
Hi People,
How do I call a perl script periodically. Say everyday at 2:00am, I copy
one directory to the backup machine?
Thanx
Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Yeah, I think you can use chomp();
so use foreach $i (@foo){
chomp($i);
do you things here
}
I am not sure if you can delete the line if it's all blank. But, worth a
try.
;)
Eric
*****
*Eric T.
Hi guys, I just configured pine to accept emails from [EMAIL PROTECTED]
to go into another folder.
Please do not reply and disregard this email.
Thanks
Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi people,
I downloaded some modules off activestate's site and wanted to install
the module.
But when I type ppm install name, it gives me an error saying
no PPD file found.
Any suggestions?
Thanks a lot!
Eric
Hi guys,
Here's a newbie question. How do I create a GUI for users using either
UNIX (SOLARIS) or Windows to execute a perl script?
Also, I like that cool box with "browse." in with ability to browse the
system looking for files.
Thank you!
Eric
Same thing but use the !~ operator instead of =~.
using
/\<(br|b|\/b|a\s.*?|\/a|p|\/p)\>/;
is the same as
$_ =~ /\<(br|b|\/b|a\s.*?|\/a|p|\/p)\>/;
To get a true answer only when the string do not match your regex, you need to do:
$_ !~ /\<(br|b|\/b|a\s.*?|\/a|p|\/p)\>
At 08:28 2002.01.08, Prahlad Vaidyanathan wrote:
>Hi,
>
>Was wondering which of these 2 pieces of code is more efficient :
>
>
>my $file ;
>foreach $file (@tarred) { #do something ; }
>foreach $file (@gzipped) { #do something else ; }
>
>
>OR
>
>
>foreach my $file (@tarred)
Thanks for the info Curis.
I don't think I saw any answers from the more internal aware gurus out there and like
Curtis, I would certainly like to know more about this.
TIA
At 14:32 2002.01.08, Curtis Poe wrote:
>--- Eric Beaudoin <[EMAIL PROTECTED]> wrote:
>> I was wonder
Hi everyone,
Because of the very interesting article by Randall in a recent SysAdmin, I've start
using the very nice Parse::RecDescent module worte by Damian Conway. This thing rocks.
See http://www.stonehenge.com/merlyn/UnixReview/col40.html for the article.
I created a big grammar and have a
At 14:01 2002.01.13, Jeff 'japhy' Pinyan wrote:
>On Jan 13, Eric Beaudoin said:
>
>>Because of the very interesting article by Randall in a recent SysAdmin,
>>I've start using the very nice Parse::RecDescent module wrote by Damian
>>Conway. This thing rocks.
At 16:20 2002.01.13, Arthur Perley wrote:
>Im trying to use the Perl module Mail::Sender to send email through SMTP.
>It works great for local domains but when I try to use it for extranet
>domains I get an error:
>[Local user "'[EMAIL PROTECTED]'" unknown on host "mail.myhost.com"]
>This isn't th
At 00:39 2002.01.14, Michael Eggleton wrote:
>Hello all,
>
> Could some one help me with clearing or re-setting and array.
>
> I have an array that has an unknow number of elements in it, at one
>point in my program I would like to clear that array or reset it so
>that it contains nothing. Ho
At 13:05 2002.01.16, Leon wrote:
>- Original Message -
>From: <[EMAIL PROTECTED]>
>To: <[EMAIL PROTECTED]>
>Cc: <[EMAIL PROTECTED]>
>>
>> | $key=~/^r(\d+)c(\d+)$/
>> ||\___/|\___/|
>> || | | | ` end of string
>> || | | `--- one or more digits => $2
I have a directory full of mp3s with various names, but I want to
convert each mp3 to the file name 1.mp3 and continuing up to the last file
in the directory - I would also like it to generate a text file that is
setup like
->
At 18:28 2002.02.01, Booher Timothy B 1stLt AFRL/MNAC wrote:
>Hello out there - I have learned a lot of Perl today, but I am still trying
>to figure one more thing out.
>
>How can I go through a file and extract all the text between certain
>delimiters - for example I have:
>
>Bilbo, "Why I like
Hi guys,
I Haven't written in this forum in so long. =)
Just wondering if there are any other software out there that can make
my perlscript independent of the Perl interpreter.
Thanks
Eric
Hello, I have perused the archives but can't find an answer to my problem.
I have built a perl program, I use DBI.pm in it.
Upon running the program I get the following return:
"Can't locate loadable object for module DBI in @INC (@INC contains:
/usr/lib/perl5/site_perl//5.6.0/i586-linux
/usr/l
Yes that is what I am getting.
IF the object exists but is unloadable and I have run cpan to load mods
what is the best move? uninstall and install cpan or is this possible?
or just run CPAN again and make changes to the info?
ej
Brett W. McCoy wrote:
>On 8 Feb 2002, Chas Owens wrote:
>
>>just
Ok that solved the DBI error but a bunch of others cropped up so I
have some work to do on my perl install.
Running perl -MCPAN -e shell didn't finish everything as I though it
would.
ej
Brett W. McCoy wrote:
>On Fri, 8 Feb 2002, Eric Jones wrote:
>
>>Yes that is what I am
Done and so far that works except it won't connect to the DB now through
socket 111. But at least I know it's no longer perl mods acting up and
I know what to look for and how to fix it next time.
thanks for the advice
ej
Brett W. McCoy wrote:
>On Fri, 8 Feb 2002, Eric Jones
I am using Mysql-3.23.43-1 and I also have Oracle9i (9.0.1) running on this
SuSe Linux 7.2 Pro box.
So far they haven't interfered with each other.
ej
Brett W. McCoy wrote:
>On Fri, 8 Feb 2002, Eric Jones wrote:
>
>>Done and so far that works except it won't connect
quot;garbage", "-FOO"); the error is to be found in
the stderr file), but not the output on STDOUT -- that is printed out on
screen just as usual.
What am I missing here? How can I do a fork, re-open STDOUT/STDERR to write
to an instance of IO::Handle, and get the return code
Dennis,
Gunnar is right, you're misusing character classes.
A correct regular expression could look like this (using /x and Perl 5.10's
named capture buffers):
/(?]+>)
(?]+>)
\s,
(?]+>]+>)
(?[^<]+)
/x
I did not test that, but I guess you'll get the meaning.
That works like a charm -- thanks!
"Chas. Owens" wrote on 07/05/2009 03:57:34 AM:
> From:
>
> "Chas. Owens"
>
> To:
>
> Eric Veith/Germany/i...@ibmde
>
> Cc:
>
> beginners@perl.org
>
> Date:
>
> 07/05/2009 03:58 AM
>
> Subj
sudo perl -e 'open($fh, "<", "/tmp/foo"); @f = <$fh>; close($fh); open($fh,
">", "/tmp/foo"); foreach(@f) { s/^(Key1=).*/$1NewValue1/; print $fh $_; }
close($fh);'
As always, TIMTOWTDI.
HTH,
-- Eric,
Alpesh Naik wrot
x27;ll probably know that already. :-)
-- Eric
Alpesh Naik wrote on 07/09/2009 12:23:54 PM:
> From:
>
> Alpesh Naik
>
> To:
>
> Eric Veith/Germany/i...@ibmde
>
> Date:
>
> 07/09/2009 12:23 PM
>
> Subject:
>
> Re: Edit a config file usi
The backticks work just as they would in a shell script. You're using them
the wrong way in your example, anyways.
my $output = `command param`;
my $rc = system('command', 'param'
From: Rajini Nai
r
message.
HTH
-- Eric
From: Amit Saxena
To:
Surprising it works with bash at all.
For the shell, your string is: '$re=q~', and the rest is no longer escaped.
HTH,
-- Eric
From: "Ma
lemba wrote on 08/20/2009 01:08:32 AM:
> Both approaches are not working as expected. They execute jar ok but
> java is crasing somewhere and gives error.
What error do you get?
--
IBM Systems & Technology G
y $value=$values[$i];
push( @{$combos{$key}}, $value );
$i++;
}
Finally, I have no doubt people can suggest how make the code
generally more perl like and efficient.
Many thanks in advance for any help,
Eric
#!/usr/bin/perl
use strict qw(vars subs);
use warnings
On Dec 4, 2009, at 8:32 AM, Shlomi Fish wrote:
On Friday 04 Dec 2009 06:10:16 Eric Mooshagian wrote:
Dear All,
This is my first post.
I present some subroutines that 1) create an index for one or more
arrays and then 2) get summary statistics based on the index. I
have 2
issues
de => (responsetime <= 200) && (responsetime >= 1200) where
responsetime refers to an array.
However, I have no idea how to do this using named parameters. Is
there a strategy for passing such arguments to a subroutine?
Thank you,
Eric
My current code:
use strict;
use warnings;
use
Correction, I meant ||, not && ...
exclude => (responsetime <= 200) || (responsetime >= 1200) where
responsetime refers to an array.
Thanks,
Eric
Begin forwarded message:
From: Eric Mooshagian
Date: February 3, 2010 10:45:37 PM EST
To: beginners@perl.org
Subject: c
On Thu, Feb 4, 2010 at 2:24 AM, John W. Krahn wrote:
> Eric Mooshagian wrote:
>
>> Dear All,
>>
>
> Hello,
>
Hi John, Thanks for the notes.
>
>
I have a few subroutines that I use to first build an index for several
>> arrays and then, for example, take
r thread. Passing a subroutine reference
doesn't work, of other options I don't know.
I'd very much appreciate any hints.
Thanks in advance.
# Eric
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
kind of child process handling.
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Reschke,
Christoph Grandpierre, Matthias Hartmann, Michael Diemer, Martina
K
t avoid (e.g., flushing command output on SIGTERM, that, in turn, can
be issued because of a SIGCHLD -- the dependency stuff). Could somebody
please give me an example in which -- using POSIX RT signals -- work in
the signal handler is responsible for corruption, or better yet, outline
when co
both shell and
perl. However, Perl doesn't execute it because of the "if 0" part, which
the shell, in turn, never reads because of the "exec" within the eval'd
string. It's actually pretty smart, but unnecessary since there easier
ways.
Eric
lloc call in a way that
> causes the perl interpreter to crash and dump core.
Well, that's as far as I'm right now. But I cannot really gasp it, that's
why I'd like a example, just the way one demonstrates the pitfalls of
malloc() to a C newbie. So if somebody could show me h
r. It is
not only pretty powerful, but also makes it easy to manage private stuff
because you're not in need of any kind of master server due to its
decentralized architecture.
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des
Jeremiah Foster wrote on 03/15/2010 05:20:16
PM:
> Shlomi mentioned git early on in this thread.
You're right, sorry, I missed that one.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrat
ush to, and as such should not
(cannot?) be edited directly.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Reschke,
slow, too. :-/
Any ideas are greatly appreciated.
Thanks in advance,
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Reschk
fered. (Note the " around "more elegant"!)
Thanks! :-)
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Resc
o->quux;
# How would I get the reference to the sub just called, so that I could
do:
$quuxref->();
--->%---
I need this for the "attributes" pragma. :-)
TIA!
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender
s it in the fashion of
"$instance->$method_name(@params)". I'd like to check in the accessor
method whether the sub I'm about to call has the ":Forks" attribute and do
a fork before actually calling it if it has.
TIA,
Eric
--
Eric MSP Veit
appear popular.
Hm, what else would you have prefered? Right now I use a r/o attribute to
set up a per-class list of methods that do not fork (actually, more
commands *do* fork than not). Method attributes would have eliminated some
typos. *grin*
TIA,
Eric
--
Eric MSP Vei
Peter Scott wrote on 04/10/2010 03:33:46 PM:
> You'd probably benefit from taking this to a Moose list.
Good idea.
Thanks for all the help, especially to Shlomi, who pointed out the
$instance->can('foo') solution.
Eric
--
Eric MSP Veith
Hechtsh
C) algorithms,
ranging from files over sockets to posix message queues. You might to have
a look at "perldoc perlipc" and the whole lot of IPC modules on cpan.
HTH.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender de
t wouldn't make much of a difference.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Reschke, Christoph
Grandpierre, Matthias Hartmann, M
roblems, and even more for programmer mistakes.
And that's why I recommended daemontools and others.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzende
all modules from CPAN directly into
the site library directory, I choose this approach, too. The only problem
that you cannot solve with the "self-contained" approach is that of
libraries with XS code: Changing library versions or even architectures
will render this particular contained l
pect" would do.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vorsitzender des Aufsichtsrats: Erich Clementi
Geschäftsführung: Martin Jetter (Vorsitzender), Reinhard Reschke, Christoph
Grandpierre, Matthias Hartmann, Michael Diemer
Kulit Ko wrote on 05/29/2010 04:38:56 PM:
> Hi Keith,
My name's Eric. ;-)
> Thanks for the reply. Is the IPC::Run always available in the perl
> installation? Ive tried is but it says it is not available in @INC.
> Thanks.
No, IPC::Run isn't available with a standard per
but nevertheless allow
wrinting to another application. Have a look at them (e.g., with "perldoc
IPC::Run2"), they're quite well documented.
> Btw, my name is Laarni.
Hm, the mail header says "Kulit Ko."
HTH.
Eric
--
Eric MSP Veith
Hechtsheimer S
ively to the Linux world years ago, and every of the
most used file systems the linux kernel supports has ACLs and extended
attributes built in. Rsync, tar, cp, ..., support ACLs and attributes.
Eric
--
Eric MSP Veith
Hechtsheimer Str. 2
DE-55131 Mainz
Germany
IBM Deutschland GmbH
Vor
s that you don't have a C compiler installed, but I
> really can't tell unless you post the output of make.
Could also be that the libattr development headers are missing. But please
post the complete log, or at least all error messages..
Eric
--
Eric MSP Veit
n the line above can be a 1 or 2 digit number. The 6 digit
number right after the 'Subject:' is an employee number and the 1 or 2
digit number after it is the hours worked.
Thank you for any attention you can give to this.
Cheers,
Eric
--
To unsubscribe, e-mail: beginners-unsubscr.
http://search.cpan.org/dist/Win32-IEAutomation/lib/Win32/IEAutomation.pm
Chas,
That looks like it might be the ticket. Thank you very much for the
information. Happy New Year!
Eric
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@per
nt
for my $i ( 0 .. 10 ){
my $sec = 10 - $i;
back_and_print( "$sec seconds" );
sleep 1;
}
back_and_print( "" );
print "\n";
Shawn,
Thank you for the reply, but I tried \b and that was one of the escape
characters activeState perl has trouble with.
Any
off the top of my head I would suggest you slice off the slice off the pieces
that you have used already when pulling data from the original array. That
way the array gets smaller as you finish modifiying its info and transferring
it somewhere else.
BassFool
On Monday 24 May 2004 02:57 pm, Ha
On Tuesday 20 July 2004 10:34 am, [EMAIL PROTECTED] wrote:
> Ok, this may or may not be a tricky one I will try and be succinct in my
> statement.
>
> I have a database (mysql 4.0) with radius log entries for each day, we
> receive emails about Acceptable Use Abuses and must figure out exactly
> wh
Does the output from the scripts go into a file or does the output print to
the screen(standard out)?
If it goes to a file then you need to open the file and read the info. If it
goes to standard out you can do something like this to get the ouput.
@info=`/home/my/directory/`
(the backtick not t
; use strict;
> use warnings;
>
> my $ref = { 'a' => 'aaa', 'b' => 'bbb', 'c' => 'ccc' };
>
> while ( my($k,$v) = each %$ref ) {
> $ref->{uc($k)} = delete( $ref->{$k} );
> }
>
> use Data::Dumper;
> print Dumper( $ref );
>
> __END__
--
Eric Walker --
CAD Engineer
X82573
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
> 928-203-0170
>
> "There are only two ways to live your life.
> One is as though nothing is a miracle.
> The other is as if everything is."
> --Albert Einstein
I am no professional but try this one.
if ($file_name !~ /(tif$|jpg$)/i
Can't you run uniq from the command prompt to get rid of the duplicate lines?
perlnewbie..
On Friday 27 May 2005 09:07 am, John Doe wrote:
> Hello
>
> As an addition to my last post:
>
> Am Freitag, 27. Mai 2005 13.56 schrieb Jack Daniels (Butch):
> > Wow, I'm really confused. I'm trying to remo
On Friday 27 May 2005 01:22 pm, John Doe wrote:
> Am Freitag, 27. Mai 2005 17.15 schrieb Eric Walker:
> > Can't you run uniq from the command prompt to get rid of the duplicate
> > lines?
> >
> > perlnewbie..
>
> [...]
>
> Yes I can,
>
> $ cat
to learn. Thanks
for any help!
-Eric
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
rom Google. Just search on "man perltoc" for instance and you will see
links to the man pages online. Good luck!
-Eric
Ryan Dillinger wrote:
Hello All,
I just recently loaded linux onto my laptop. I hope this was not a bad
move.
But I cannot find the Activstate Perl I downloaded.I am u
I think if you filter on who they're to as opposed to who they are from,
you should be fine. All these emails are to "beginners@perl.org". Use
that as your filter criteria.
Johnson, Reginald (GTI) wrote:
Hi All,
I have just started to receive these mails and find them very useful.
However, I
Check out this web page,
http://www.developer.com/lang/other/article.php/3454041. It has examples
that return link and tags using WWW::Mechanize, which is a subset of LWP.
-Eric
Hal Wigoda wrote:
anyone have any code that will return the links and tags from web
document
downloaded using
Hi, I am new to the list, so I apologise if I do anything wrong :)
I made the script below to check files that are duplicates but I only
want to check the first few bytes (perhaps 1-10k, depending on false
positives)
I would like to convert it to native perl, can someone give me some pointers?
I am sure someone else can do it better, but how about the following?
foreach (@rray){
if (/match/) {print "yay";}
}
On 10/10/06, Charles Farinella <[EMAIL PROTECTED]> wrote:
How can I iterate through an array and if I find a match do something
without doing that thing for every element in th
1 - 100 of 322 matches
Mail list logo