Hi Jack
Please refer to my program 'Simple Mail Client' under code section
on www.perlmonks.org it will takes care of mail header and will allow you
to work with mail body. Do let me know if it helped you ... I am working
on the update.
Regards
Joel
Jamnet
Monk
www.perlmonks.org
At 02:30 PM 6/
I've created a simple perl script to read in words and translate them into
numbers based on the phone keypad. Right now I'm using the following
method:
while(<>){
s/[abc]/2/gi;
# inbetweens (3-8) left out for simplicity sake
s/[wxy]/9/gi;
}
can anyone please suggest a be
Hi All,
I've installed Active Perl on Windows 2000 server. Installation was not a
problem at all.
All the functions are working OK. However, if I click on "ADO Object" in the
ADO Sample section at http://localhost/PerlScript/index.htm, I get the
following response;
Error Type:
PerlScript Error (
Actually the CC: field, which you can't create a rule for in Exchange AFAIK.
> -Original Message-
> From: Brett W. McCoy [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, June 19, 2001 3:23 PM
> To: Eduard Grinvald
> Cc: [EMAIL PROTECTED]
> Subject: Re: Subject Prefix
>
>
> On Tue, 19 Jun 200
I think a subject prefix is a very good idea. Just an idea, use it, don't
use it
;^)
> -Original Message-
> From: Brett W. McCoy [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, June 19, 2001 3:31 PM
> To: [EMAIL PROTECTED]
> Subject: RE: Subject Prefix
>
>
> On Tue, 19 Jun 2001, Pieter He
he he...
i just finished receiving over 700 emails from the list during the weekend.
ironic how the pleas to "stop" actually create more mail for those poor subscribers...
i think the unsubscribe script is actually on the homepage at:
http://learn.perl.org/
PS,
you can try the "digest" versi
According to my email client, this just arrived on the list:
From: "Cohan, Drew" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, June 16, 2001 2:20 PM
Subject: trying to convert characters into numbers based on a table
It's contents are just slightly different to the one that was al
I have unsubscribed to all your supposed E-mail
subscriptions. You you PLEASE pass the word to your
subscribers to stop sending e-mail to me concerning
Perl. Your subscribers are flooding me e-mail
90+ e-mail a day. I original subscribed to your server
to get some insight into using Perl. I am ve
Hi, all
I got a message when I run the perl script, I never got this msg before, is
there anyone can tell me why?
How can I fix it?
rplcstr.pl did not return a true value at replacestr.pl line 6
Tips: on line 6, statement is "require("rplcstr.pl");"
Best regards
Peter Zhou
___
I'm trying to wirte a recursive subroutine that recives an array, does some
processing and then calls itself with a new array.
The problem is that I never get to retrive the array after the subroutine
has ran once. When it runs the second time it doesn't get the correct set of
items in the passed
Randal
Would the same be possible for generating dynamic queries of web pages like
amazon.
cheers
Saurabh Bansal
BTexact Technologies is a trademark of British
Telecommunications plc
Registered office: 81 Newgate Street London EC1A 7AJ
Hi Beginners,
Does anyone know how I can look for a certain phrase within a sql file
(approx 6 words, normally part of a header)?
Thanks in advance,
Wayne
Hi..friends..i have had enough of perl...now tell me a way to get out of here..i
could not do it from the unsuscribe menu..why dont you all throw me out of
this mailing lists...i would be greatful.
--
___
FREE Personalized E-mail at
TMTOWTDI.
I don't know about how XML::Parser handles memory - last time I tried to use it to
parse content.rdf from http://dmoz.org , it soaked up all my memory, then bombed.
Sometimes, you need to write your own parsing subs :)
>>> Chas Owens <[EMAIL PROTECTED]> 06/19/01 09:39pm >>>
Please, p
Some people have obviously lost the first email they received from this list, so
here's a recap.
To unsubscribe to the list, you need to send an email to a special email address that
is formed partly from YOUR OWN email address. For example, if your email address is
[EMAIL PROTECTED], you shou
> Randal
Well I'm not Randal, but I'm going to answer anyway...
> Would the same be possible for generating dynamic
> queries of web pages like amazon.
The points Randal made were:
1. Yahoo has URLs that return CSV files.
These are not web pages though the protocol
is http. The perl in
Stick a:
1;
at the end of the require'd file.
> I got a message when I run the perl script, I never got this msg
before, is
> there anyone can tell me why?
> How can I fix it?
> rplcstr.pl did not return a true value at replacestr.pl line 6
>
> Tips: on line 6, statement is "require("rplcst
From: Nigel Wetters [mailto:[EMAIL PROTECTED]]
> I don't know about how XML::Parser handles memory - last time
> I tried to use it to parse content.rdf from http://dmoz.org ,
> it soaked up all my memory, then bombed. Sometimes, you need
> to write your own parsing subs :)
A casual reader coul
> [recursive procedure not localizing array passed as parameter]
> ---
> &buildBranch(@someNodes);
>
> sub buildBranch()
> {
> @numNodes = @_;
Use my @numNodes.
my declares a new private variable each time
it is encountered.
Without it, @numNodes is the same variable
each time the procedure g
Iv been givin this program to modify, but I can not astblish what some parts
of the program are doing. From
printf
to
}
Can any body help please and run through it with me pls!
open iscd,"<$ARGV[0]" or die "Cannot open $ARGV[0]",$!;
open sortcode,">$ARGV[1]";
while($line=){
> > I don't know about how XML::Parser handles memory - last time
> > I tried to use it to parse content.rdf from http://dmoz.org ,
> > it soaked up all my memory, then bombed. Sometimes, you need
> > to write your own parsing subs :)
>
> Is the file you referred to a really big file?
dmoz is
> Iv been givin this program to modify, but I can not astblish what some
parts
> of the program are doing. From
>
> printf
> to
> }
>
> Can any body help please and run through it with me pls!
>
>
>
> open iscd,"<$ARGV[0]" or die "Cannot open $ARGV[0]",$!;
> open sortcode,">$ARGV[1]"
Hi All,
I have been asked to transform this bit of PERL coding into plain english,
Can someone help me please.
Regards,
Elaine.
# Exit code for the ccount form
sub form_ccount_exit
{
if ( $_[0] == 0 ) # exit_RE detected
{
if ( $user_input eq $bn_done )
> Hi All,
>
> I have been asked to transform this bit of PERL coding into plain
english,
> Can someone help me please.
>
> Regards,
> Elaine.
Before anyone attempts an answer, are you a programmer?
Do you know what, say, parameters are?
> # Exit code for the ccount form
> sub form_ccount_exit
>
Hi, I am new to perl and have been chucked in the deep end!!! I have been
asked to write a perl script, with a output in report style;
Description for script:
Read a file, (sorted)
take certain data from the file, (problem)
put the cert
Is there a Perl way to move a folder with out doing it one file at a
time? (Similar to M$ Windows Explorer where you can drag a folder to
another folder?)
--
Timothy L. Musson [EMAIL PROTECTED] ===)
IBM Global Services [EMAIL PROTECTED] (from my PalmPilot!)
> Hi, I am new to perl and have been chucked in the deep end!!! I have
been
> asked to write a perl script, with a output in report style;
>
> Description for script:
> Read a file, (sorted)
> take certain data from the file, (problem)
>
Thank you very much for this script.
And if English had been my native lauage it had been perfect.
I need the script to add my native letters as well, I'm Swedish and
therfor use "åäöÅÄÖ"
in the articles. Is this possible?
And in the text some words is wrapped in tags, is it
possible to remove
> Is there a Perl way to move a folder with out doing it one file at a
> time? (Similar to M$ Windows Explorer where you can drag a folder to
> another folder?)
In some cases:
rename $Old $New;
will work.
In some cases,
system ("mv $Old $New");
will work.
There's a bit more detail
Hello,
I have a problem with following script:
#!/usr/local/bin/perl
use Win32::OLE;
use Win32;
$object = Win32::OLE->new('Speech.VoiceText');
$speechObject = $object->speak("Hello");
I use an OLE object from Microsoft Voice Text (Text to Speech).
However, nothing is happen. No errors, no a
Hi All
Does PERL write compile errors and warnings to STDERR and if so is
there any easy way to have them written to a file rather then to the
console?
Some language have a command line switch which allows you to
redirect the error messages to a log file, but I did not see one
This code is a mess, your better off rewriting it.
>
> open iscd,"<$ARGV[0]" or die "Cannot open $ARGV[0]",$!;
> open sortcode,">$ARGV[1]";
> while($line=){
> chomp $line;
> @fields=split "\t",$line;
> printf sortcode
> "\n%6.6s%8.8s%3.3s%27.27s%20.20s%35.35s%35.35s%10.10
On Wed, 20 Jun 2001, Tim Musson (palm) wrote:
> Is there a Perl way to move a folder with out doing it one file at a
> time? (Similar to M$ Windows Explorer where you can drag a folder to
> another folder?)
Of course -- take a look at the File::Copy module. It has a move function
in it.
-- Br
Same here, many duplicates in fact. I thought I was having a little deja
vu until I read this one. Can the list masters look into this one please?
Stephen
__ Reply Separator _
Subject: Re: trying to convert chara
Hi Gary
I have tried redirecting the output to a file
perl perl-prog.pl >perl.log
but the compile error messages go to the console.
Thanks
Bill Conrad
-Original Message-
From: Gary Stainburn [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, June 20, 2001 8:36 AM
To:
On Wed, 20 Jun 2001, Conrad, Bill (ThomasTech) wrote:
> I have tried redirecting the output to a file
>
> perl perl-prog.pl >perl.log
>
> but the compile error messages go to the console.
If you are using a Unix command-shell, if you want to redirect stderr to a
file, you need
Thanks Gary
That worked.
-Original Message-
From: Gary Stainburn [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, June 20, 2001 9:14 AM
To: Conrad, Bill (ThomasTech); [EMAIL PROTECTED]
Subject: Re: Compile Errors Question
Hi Bill,
the reason you're still getting errors on the scree
(Thanks ME, who ever you are)
Hi, I have been asked to write a perl script, to format the output
in to fields/columns;
Description for script:
*Read a existing file and put it in my requested format,
*Take certain data types from the file (input),
(proble
Hey Brett,
Wednesday, June 20, 2001, 8:38:34 AM, you wrote:
>> Is there a Perl way to move a folder with out doing it one file at
>> a time? (Similar to M$ Windows Explorer where you can drag a folder
>> to another folder?)
BWM> Of course -- take a look at the File::Copy module. It has a move
B
Ok, I was wrong, the folder is created in the Destination dir, but it
is empty, and my perl code gives an error in the die statement...
Uncaught exception from user code:
Error: Permission denied
What am I doing wrong here?
>>> Is there a Perl way to move a folder with out doing it one
On Wed, 20 Jun 2001, Tim Musson wrote:
> BWM> Of course -- take a look at the File::Copy module. It has a move
> BWM> function in it.
>
> Isn't File::Copy for Files? I need to move Directories. For example a
> WinNT directory that has been copied to a network drive for backup.
I believe it works
On Wed, 20 Jun 2001, Tim Musson wrote:
> Ok, I was wrong, the folder is created in the Destination dir, but it
> is empty, and my perl code gives an error in the die statement...
>
> Uncaught exception from user code:
> Error: Permission denied
>
> What am I doing wrong here?
Perhaps you
:Why? What could I do to hear the audio output?
Try printing the value of $speechObject... If it is 0 or "", your speak()
function might not have succeeded for one reason or another.
Hey Brett,
Wednesday, June 20, 2001, 9:51:09 AM, you wrote:
BWM> The function may not work across filesystem boundaries, and this
BWM> may include networked drives (especially on WinNT -- not sure
BWM> what it can do).
BWM> I think rename may also be usable, but again, it may have the same
BWM>
Hey Brett,
Wednesday, June 20, 2001, 9:52:01 AM, you wrote:
>> Uncaught exception from user code:
>> Error: Permission denied
>>
>> What am I doing wrong here?
BWM> Perhaps you don't have permission to access the drives or folders
BWM> in question?
Nope, my test drive is my ThinkPad's
Hi all,
I have a text widget that is configured to have tab stops every 100
pixels, with the text centered on the tab stop. Is there a way to save the
text to a file and preserve the format so the file will look the same when
opened in another text editor?
Thanks!
---
Corey Brennan
hi all,
when i install GD.pm will all the sub modules automatically be installed. eg
GD::Graph GD::Image etc.
cheers,
rajib
_
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
> Here is two data examples from the input file
> (each data is normally streachted along ONE LINE) :
> (I need the three data types that are'underlined'
> (ID.NUMBER, BranchNAME, ADDRESS).
I don't see anything that is 'underlined'. So I can't
tell what's the id number etc. I assume the add
Below is a piece of code that determines what web site you just came from.
I want to put a line in their that will exclude me
###here is the working code
if ($ENV{'HTTP_REFERER'} eq "" | '0')
{$previous = "$ENV{'HTTP_HOST'}$ENV{'DOCUMENT_URI'}";}
else
{$previous = "$ENV{'HTTP
[Rajib Mukherjee] [[EMAIL PROTECTED]] quoth:
*>when i install GD.pm will all the sub modules automatically be installed. eg
*>GD::Graph GD::Image etc.
No, you'll have to install them separately. Also, be sure to read the
README in the GD documentation as on some platforms installing GD and the
l
hi all,
will it work if i only install GD::Graph and GD::Image without installing
the GD.pm
rajib
_
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
> "Nigel" == Nigel Wetters <[EMAIL PROTECTED]> writes:
Nigel> Some people have obviously lost the first email they received
Nigel> from this list, so here's a recap.
Nigel> To unsubscribe to the list, you need to send an email to a
Nigel> special email address that is formed partly from YOUR
hi all,
i need to use GD::Graph::bars
does that mean i have to begin with installing GD.pm - then GD::Graph and
then GD::Graph::bars.
how should i go about it.
excuse me i am new to installing modules.
rajib
_
Get Your Privat
hello all,
i get the following error message when trying to start the httpd:
Starting httpd: [Wed Jun 20 15:03:12 2001] [error] Can't locate
Apache.pm in @INC (@INC contains: /usr/lib/perl5/5.6.0/i386-linux
/usr/lib/perl5/5.6.0 /usr/lib/perl5/site_perl/5.6.0/i386-linux
/usr/lib/perl5/site_perl/5
Alright, I've got a little task to do for my boss man, and I think
Perl might be the best way to go. Unfortunately, I'm not yet
comfortably savvy to dive into the project. My question is:
Is Perl suited for this project? If so, can a beginner get it done
in a timely fashion?
You see, we'd lik
Hrmmm...
There is a classic joke:
What do you call someone who speaks many languages?
A polygot.
What do you call someone who speaks two languages?
A bilingual.
What do you call someone who speaks one language?
An American.
My first attempt to fix this was to add:
open FH, $ARGV[0] or die "Cou
>You see, we'd like to add a count of users online to our homepage.
>We are an ISP, and as such, this information is stored not on the
>websever that will host the page, but rather inside of the various
>dial-in platforms both in the office and at our co-location points.
It's certainly feasib
On 20 Jun 2001 11:54:12 -0400, Chas Owens wrote:
> open FH, ">$ARGV[0].tmp.$$" or die "Could not open $ARGV[0]:$!";
>
> print FH $file;
>
> close FH;
>
>
> and change
>
> $parser->parsefile($ARGV[0]);
>
> to
>
> $parser->parsefile("$ARGV[0].tmp.$$")
I have removed the writing of $file t
> "Chas" == Chas Owens <[EMAIL PROTECTED]> writes:
Chas> #replace anything not in lower ASCII, Damn Americans
Chas> for (my $i = 0; $i < length($file); $i++) {
Chas> my $char = ord(substr($file, $i, 1));
Chas> if ($char > 128) {
Chas> print "replacing ", chr($
[plz keep everthing on list unless there's
a particularly good reason to go off list]
> > (I need the three data types that are'underlined' and are in
'font
> > size 14 large'
That sort of formatting doesn't work on this list.
(Btw, what you are calling 'data types' are really data items.
Take a look at the write operator, format and using |'s to center text for
report writing. If you have Learning Perl (ORA) the info you need is on
pp.23.24.29.116.118.119.232 the info about fileholders (so you can center
your text) is on p.120.
Let me try (in my novice way) to give you an example
Is this your homework?
Crystal
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, June 20, 2001 4:19 AM
To: [EMAIL PROTECTED]
Subject: Can you someone help me please
Hi All,
I have been asked to transform this bit of PERL coding into plain english,
> "Chas" == Chas Owens <[EMAIL PROTECTED]> writes:
Chas> #replace anything not in lower ASCII, Damn Americans
Chas> for (my $i = 0; $i < length($file); $i++) {
Chas> my $char = ord(substr($file, $i, 1));
Chas> if ($char > 128) {
Chas> print "replacing ", chr($
Hi group.
Short 'n sweet question. Is there a way to run perl programs from the command line
without having to precede usage with "perl"
so I can go
myprogram [Arguments]
Instead of
perl myprogram [Arguments]
If there is no way to do this...would making a bat file (windows) of the same nam
> "Crystal" == Crystal Gruetzmacher <[EMAIL PROTECTED]> writes:
Crystal> Is this your homework?
Nahh... that stuff is too freaky to be homework. I'll wager a pint or
two that this is a new guy hired to replace a guy who got smarter and
moved on to a better job, and the new guy now has inher
Given this is my definition for self in some new constructor:
sub new {
$self {
Next => @[Max_Level],
}
}
First, is this the proper way to have Next be a reference to an annonymous
array of size Max_Level?
More importantly, how do you reference the elements in the a
> "Randal" == Randal L Schwartz <[EMAIL PROTECTED]> writes:
Randal> Take for example the string "\200abc"...
Randal> After you replace "\200" with "&200;",
Oh blah. I can't do math this early. "\200" is replaced with "€",
but the rest of the comment stands. :)
--
Randal L. Schwartz - St
I have two different packages that access each others methods. (where in my
case one package is an element I have defined and the other package is an
implementation of a list of those elements) When I call a method from
package 1 with an object from package 2. the method in package 1 takes a
$
> "Nick" == Nick Transier <[EMAIL PROTECTED]> writes:
Nick> Given this is my definition for self in some new constructor:
Nick> sub new {
Nick>$self {
Nick> Next => @[Max_Level],
Nick>}
Nick> }
Nick> First, is this the proper way to have Next be a reference to a
Hello Ron and everybody on this list.
In order to find the best way to complete the task the fastest way, you need to
first analyse your system and how it's going to react to your algorithm.
Basically your task can be split into 2 parts, one IO intensive part (reading
the files) and one CPU inte
Folks,
I have been looking for a little regex that would remove NULL (blank) lines
from input.
I have a little script that parses the output of timex (unix), unfortuanly
the timex output
is prepended with a blank line and appended with a blank line as such
(timex ps -ef > /dev/nul) 2>&1
[begin
So then would I access the nth element by
@{$self->{Next}}[n] ??
>From: [EMAIL PROTECTED] (Randal L. Schwartz)
>To: "Nick Transier" <[EMAIL PROTECTED]>
>CC: [EMAIL PROTECTED]
>Subject: Re: $self def
>Date: 20 Jun 2001 09:29:41 -0700
>
> > "Nick" == Nick Transier <[EMAIL PROTECTED]> writes:
You are saying I cannot set the size of an array? I understand that you do
not have to, but I need to in this case so that my iteration loops work
correctly.
>From: John Edwards <[EMAIL PROTECTED]>
>To: 'Nick Transier' <[EMAIL PROTECTED]>, [EMAIL PROTECTED]
>Subject: RE: $self def
>Date: Wed,
Hello
Say you obtained the output using the backticks:
$str = `(timex ps -ef > /dev/nul) 2>&1`;
then just
$str =~ s/^\s+//; # remove the first line
%timex = split(/\s+/, $str);
print "$_: $timex{$_}\n" for keys %timex;
will output:
real: 0.00
user: 0.00
sys: 0.00
(order is not preserved, but
> "Nick" == Nick Transier <[EMAIL PROTECTED]> writes:
Nick> So then would I access the nth element by
Nick> @{$self->{Next}}[n] ??
Uh, no. That looks like @foo[3], which works for some broken values
of "works". You want $foo[3], so to backtrace that, use ${$self->{Next}}[$n],
also written
On Wed, 20 Jun 2001, Nick Transier wrote:
> You are saying I cannot set the size of an array? I understand that you do
> not have to, but I need to in this case so that my iteration loops work
> correctly.
No you don't:
foreach $i (0..@array) {
print "$array[$i]\n";
}
@array used in a
>
> Not withstanding my other comment, this code is also inefficient,
> both tactically and strategically.
I know it was horrendous code, it was just the first thing that popped
into my head. After I had it working I was going to make it more
efficient.
>
> Take for example the string "\200a
As a last ditch effort to get this serial device to
write I found a Perl module called "IPC::Open3" it
seems to have the ability to write to a serial device.
Does any body have any experience with it? I read the
documentation on CPAN.org's site numerous times but
kept on asking myself "Duh, what?"
On 20 Jun 2001, Randal L. Schwartz wrote:
> The problem with references is that they have a very hard to explain
> but completely intuitive interface. :)
Gee, just like pointers in C! :-)
-- Brett
http://www.chapelperilous.net/btfwk/
--
At 12:33 PM 6/20/01 -0400, Yacketta, Ronald wrote:
>Folks,
>
>I have been looking for a little regex that would remove NULL (blank) lines
>from input.
>I have a little script that parses the output of timex (unix), unfortuanly
>the timex output
>is prepended with a blank line and appended with a b
> $str =~ s/^\s+//; # remove the first line
odd!
this results in
Use of uninitialized value at ./beta.pl line 58.
Use of uninitialized value at ./beta.pl line 58.
=>
Use of uninitialized value at ./beta.pl line 59.
Use of uninitialized value at ./beta.pl line 59.
real => 0.06
user => 0.04
sys
> my $timex = `(timex ps -ef > /dev/null) 2>&1`; # /dev/null
> has 2 ells on
> my system
> $timex =~ tr/\n//s; # Embedded and trailing blank lines
> $timex =~ s/^\n//;# Leading blank line
@oratime = qx((timex ps -ef > /dev/null) 2>&1 );
foreach my $holder (@oratime) {
Does anyone know of a way to modify the Terminal Server Profile Path
property of an NT account with Perl? The only way to modify this property
from a command line that I have found so far is with tsprof.exe which is
included with NT4 TSE and W2K. So, I could use a Perl script to build a
.cmd fil
> "Brett" == Brett W McCoy <[EMAIL PROTECTED]> writes:
Brett> On Wed, 20 Jun 2001, Nick Transier wrote:
>> You are saying I cannot set the size of an array? I understand that you do
>> not have to, but I need to in this case so that my iteration loops work
>> correctly.
Brett> No you don't:
At 01:10 PM 6/20/01 -0400, Yacketta, Ronald wrote:
> > my $timex = `(timex ps -ef > /dev/null) 2>&1`; # /dev/null
> > has 2 ells on
> > my system
> > $timex =~ tr/\n//s; # Embedded and trailing blank lines
> > $timex =~ s/^\n//;# Leading blank line
>
> @oratime = qx((timex ps -ef >
Hey SAWMaster,
Wednesday, June 20, 2001, 12:10:49 PM, you wrote:
S> Hi group.
S> Short 'n sweet question. Is there a way to run perl programs from
S> the command line without having to precede usage with "perl"
I see you are running M$ Win, but which version? What Perl are you
running? I have
On Wed, Jun 20, 2001 at 09:59:38AM -0700, Paul Burkett wrote:
> As a last ditch effort to get this serial device to
> write I found a Perl module called "IPC::Open3" it
> seems to have the ability to write to a serial device.
I'm not sure where you got this idea. IPC::Open3 is for reading and wr
heh, thanks that might explain why it is working, I'm
just using last ditch efforts to get this thing to
work.
He do you or anybody know of a program like TIP
(creates a terminal connection to a remote host) that
will work in Perl, right now all I get is "tip:must be
interactive", thanks.
> On We
On Wed, Jun 20, 2001 at 11:06:19AM -0700, Paul Burkett wrote:
> He do you or anybody know of a program like TIP
> (creates a terminal connection to a remote host) that
> will work in Perl, right now all I get is "tip:must be
> interactive", thanks.
What's giving you this error message? If you're
Basically I'm suppose to be able to change the cameras
which are displayed on the webpage. Right now I can
change the cameras displayed on the webpage by
accessing Tip and typing in a command like '@01' (any
value through @01-@16) also you can type in '@22' (any
value through @22-@44) and it will
On Wed, Jun 20, 2001 at 03:01:00PM -0500, Abdulaziz Ghuloum wrote:
> Hello Ron and everybody on this list.
>
> In order to find the best way to complete the task the fastest way, you need to
> first analyse your system and how it's going to react to your algorithm.
> Basically your task can be spl
Hey all,
Well, the subject says it all. Four days removed from a Perl class, and I
feel like I'm forgetting everything (guess that's what happens when you
don't take Randal's class ;p).
Anyway, here's what I'm trying to do. I have a file that I'm reading into
the program with an open command. E
On Wed, Jun 20, 2001 at 11:26:32AM -0700, Paul Burkett wrote:
> Basically I'm suppose to be able to change the cameras
> which are displayed on the webpage. Right now I can
> change the cameras displayed on the webpage by
> accessing Tip and typing in a command like '@01' (any
> value through @01-
Try $item=~/^\d{3}/;
Chris D. Garringer
LAN/WAN Manager
Master Certified Netware Engineer
Microsoft Certified Systems Engineer
Certified Solaris Administrator
Red Hat Certified Engineer
[EMAIL PROTECTED]
fax 713-896-5266
>>> Tom Yarrish <[EMAIL PROTECTED]> 06/20/01 01:51PM >>>
Hey all,
Well, th
On Tue, Jun 19, 2001 at 03:41:40PM -0500, Jeff Wagg wrote:
>
> Hi,
> I was just wondering if there were any file test operators (or
> modules containing these operators) which tested files for their type. For
> example, is there a way to test a file to see whether or not it's in FITS
> form
Are you trying to use a hash??
---
@myArray = qw(one two three four);
&new;
sub new {
$self{'Next'} = \@myArray;
}
print "Element 0 is $self{'Next'}->[0]\n";
---
You can't specifiy the size of the array, it's dynamic. Just enter your data
into the array and it will change size accordi
Hi
Can anybody send me code of perl that will take input from web and execute Unix
command ,I mean SYSTEM(/bin/somecommand $variable)
I have try everything but still not able to execute from web ,everything goes fine
from command line :perl -T script.pl variable=blabla
For god's sake, nobody reply :)
- Original Message -
From: "Alen Sarkinovic" <[EMAIL PROTECTED]>
Date: Wednesday, June 20, 2001 3:11 pm
Subject: need code
>
>
>
> Hi
> Can anybody send me code of perl that will take input from web
> and execute Unix command ,I mean SYSTEM(/bin/some
So, is this what you're looking for:
#!/usr/local/bin/perl
use warnings;
use strict;
my $item;
my %hash;
#open(FILE, "file") or die "Can't open file: $!\n";
while () { # using builtin data
# match line of at least 3 digits at beginning of line
/^(\d{3})/; # or more visually $_ =~ /
I have written a module I want to test in a shell program, how do I load the
module in another perl file to test the methods of the module's packages?
-Nick
_
Get your FREE download of MSN Explorer at http://explorer.msn.com
1 - 100 of 165 matches
Mail list logo
