How about this?
while($_ =~ /(\d{1,2}\/\d{1,2}\/\d{4})/g){
push @q,$1;
}
Perl assigns the variable $1 to the first match in parentheses. ($2 for the
next match within the same regex, and so on)
The regex above matches:
One or two digits \d{1,2}
followed by
a backslash
Hi,
a simple question:
if my program starts a thread, does it wait until the thread finishes or do
it run futher?
Other harder question:
if I fill an array or other complex datastructure is it a pain in the neck
to give it over to the main-prog,
(like it is with processes...) or is it easy?
>
That is okay, I dont want to do that way. I want to write
stronger regular expressions.
I would like to know if my regular expressions are correct.
further, when I write something like /((a|A)(b|B))/g
For aB I am getting, $1 = aB, $2 = a, $3 = B.
and $4,5,6 .. have the next occurrences. But I do n
A thread is a flow of control through a program with a
single execution point.Threads are one of the pieces
of a process. Every process has at least one thread
and, up until now, every process running Perl had only
one thread. With 5.005, though, one can create extra
threads.
In one implementa
Nope, Try cluster patterns , so rewrite $day,$month,$year as
$day="(?:[12]?[0-9]|30|31)";
etc
>From: "Rum Pel" <[EMAIL PROTECTED]>
>To: [EMAIL PROTECTED]
>Subject: grouping regex match return values
>Date: Wed, 18 Sep 2002 00:17:44 -0400
>
>
>I want to pick dates from a file, I did it the
This seems like a stupid question... but I've looked in lots of places and
can't figure it out.
I'd like to break my perl script into several files (because it is getting
awfully large, with all the callbacks from Tk), but still keep the lexical
scope. Maybe I'm thinking too much like a C progra
Hi,
I run into a problem and would appreciate some help.
I'd like to write a subroutine that parses an XML file.
I use XML::Parse and one way that works is to define
subroutines with the name of an XML tag and every appearance
of that tag calls the appropriate subroutine.
Since I want to have t
On Tue, Sep 17, 2002 at 08:00:06AM -0400, FlashGuy wrote:
> Hi,
Hi FlashGuy,
> I have a web interface where I'm executing a compiled perl script. Within the perl
>script I'm trying to execute a DOS command but its not working properly.
> If I put my command in a batch file and execute the batch
> HI all,
>
> When i execute a command the output is like as follows:
>
> I want to grep for things which are highlighted in blue colour.
> How to do this???
>
>
>
> Oplog IDs for row "BLR_ComEPR_ADT" (@ blrk4005a):
> oid:d9782f3d.48f111d4.a2eb.00:90:27:cc:b7:c8=176502 (BLR_ComEPR_A
HI all,
When i execute a command the output is like as follows:
I want to grep for things which are highlighted in blue colour.
How to do this???
Oplog IDs for row "BLR_ComEPR_ADT" (@ blrk4005a):
oid:d9782f3d.48f111d4.a2eb.00:90:27:cc:b7:c8=176502 (BLR_ComEPR_ADT)
oid:07112e91.ee38402a
On Tue, 17 Sep 2002, Cricker wrote:
> This seems like a stupid question... but I've looked in lots of places and
> can't figure it out.
>
> I'd like to break my perl script into several files (because it is getting
> awfully large, with all the callbacks from Tk), but still keep the lexical
> sc
Dan,
Sounds like you're moving into the realms of threads. Perl 5.8.0 has stable
threading support. Install it and type 'perldoc perlthrtut' for details. If
you take a threaded approach to solving this problem, you'll probably have
a main thread of execution that launches seperate threads for eac
Hi All,
I have a output as follows:
I like to grep first two lines(it should be in loop) ==>Line 1&
==>Line 2
Oplog IDs for row "ERL_ComEPR_Project_Management" (@ eh20417c):
==>Line 1
oid:9534a99c.142611d4.a2d5.00:90:27:cc:b7:c8=5467
(BLR_ComEPR_Project_
Thanks, but I thought that modules were for submitting to CPAN. Don't I
have to go through all the @ISA and Exporter:: stuff if I write a module? I
would like to get away with something simpler.
Thanks again.
"Sudarshan Raghavan" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EM
I have a problem with a regular expression :
I process a text file with a list of names.
I would like to reformat names like
Francois de la Varenne
Macha Meril
BuzzMac Cormack
(there must be at least two words in the name)
to something like this :
[EMAIL PROTECTED]
[EMAIL PROTECTED]
>
> I have a text file with a list of about 56,000 filenames.
> Only the filenames are in this file. I have another 30,000
> or so .cfm and .htm files. I want to use File::Find to cycle
> through EVERY file in EVERY directory line by line (about 2
> million lines in all). Evertime it comes a
Good Morning Everyone,
Got another question: I wrote my first Perl script last night and it seemed to be
error free on Windows. But when I uploaded it to Linux (RH 7.3) it threw an error that
I don't understand. From a Google search it seems there could be a number of problems
and I am not exp
i would reall like to start creating my own modules for all those regularly
used bit and pieces, but i don't know where to start. i have read perldoc
perlmod and sources of loads of other modules but nothing..
if i laid down a small scenario, could someone help me modulise it so i can
get my head
Use of uninitialized value in concatenation (.) or string at log.pl
line no 17 is a for loop
for ($i =0; $i < $ line_number ; ++ $ i)
the value of line_number is 1000
can somebody tell me what exactly is this error pointing to!! and how do
you know about an error .. as in how to debug!
regar
Are you sure you know what this 'if' statement is doing?
It always evaluates true. and the m/$litem/$matchitem/i shouldn't be in
quotes.
if($litem, "/$matchitem/"){ ## always true
$PNdString =~ "m/$litem/$matchitem/i"; ## not a pattern match if it's
in quotes
print (OUTFILE "$PNdS
Hi
I want to put a hash into each element of an array. I do it like the following bit of
code. When I iterate round my hash before putting it in the array of the hash
values/keys are there. However, when I iterate through the hash after putting it in
the array all i get is '4/8' as the oupu
Apparantly not.
What the 'if' statement was SUPPOSED to do is to check if it had found a hit
and, if it did, replace the string. If it didn't, it is simply supposed to
write the line out to the temp file and move on. That is obviously NOT what
it is doing it seems. How would YOU structure this sta
you have a space that shouldn't be there:
> print "THIS DOESN'T WORK: $key $newHash {$key}\n";
^
should be:
print "THIS DOESN'T WORK: $key $newHash{$key}\n";
> -Original Message-
> From: Simon Tomlinson [mailto:[EMAIL PROT
Apologies, that was bad typing in my email. I rearrange the algorithm to make it
easier to read. Here is my exact source and the exact output. Even without the space
there, it still doesn't work!!
Any ideas?
Simon.
sub getEvents
{
my @rows = &getDBTable($tbl_events);
my @colDefs = ("
pravesh biyaNI wrote:
> Use of uninitialized value in concatenation (.) or string at log.pl
>
> line no 17 is a for loop
>
>
> for ($i =0; $i < $ line_number ; ++ $ i)
>
> the value of line_number is 1000
>
> can somebody tell me what exactly is this error pointing to!! and how
> do you know abo
Hello Again All,
Perhaps if you all saw my logic during this script it would help you understand what I
am trying to do and maybe see a bit better what is failing. Here is my code again, but
fully commented...
Thanks!
Anthony
my $PNdString = ""; # Setting it to blank
sub process_files{
#
I rewrite our code like this and it works !
#!/usr/bin/perl
use strict;
my @array;
my $count = 0;
my $maxCount = 1;
while ($count < $maxCount){
$count++;
my $myHash = &getHash;
foreach my $key (keys %$myHash )
{
print "THIS WORKS: $key $myHash->{$key}\n";
On Wed, 18 Sep 2002, Simon Tomlinson wrote:
>
>
> Apologies, that was bad typing in my email. I rearrange the algorithm to make it
>easier to read. Here is my exact source and the exact output. Even without the
>space there, it still doesn't work!!
>
> Any ideas?
> Simon.
>
>
> sub getE
You can obviously write your own package files
you must seriously consider 'perldoc perlmod'
Cricker wrote:
> Thanks, but I thought that modules were for submitting to CPAN. Don't I
> have to go through all the @ISA and Exporter:: stuff if I write a module? I
> would like to get away with s
Why dont you just define the function outside and call them from inside
your master function
Bernd Prager wrote:
> Hi,
>
> I run into a problem and would appreciate some help.
>
> I'd like to write a subroutine that parses an XML file.
> I use XML::Parse and one way that works is to define
> s
Thank you so much - that has done the trick!!
I guess this is a common mistake that people who don't take the time to read the
manual on references make!!
Thanks again,
Simon.
On Wed, 18 Sep 2002, Cricker wrote:
> Thanks, but I thought that modules were for submitting to CPAN.
No you can write modules for your own use too.
> Don't I
> have to go through all the @ISA and Exporter:: stuff if I write a module? I
> would like to get away with something simpler.
That'
This may not be the best way But I wud work fine
sub remove_space {
my($s)=@_;
$s=~s/\s+//g;
return $s;
}
while(){
s/^(.*?)\s+(.*)$/$1.remove_space($2)/
print;
}
Panel Vincent - A53 wrote:
> I have a problem with a regular expression :
>
> I process
Hi,
if you're a C programmer, then you use make with decent sized projects, I
assume? If so, keep all your little source scaps in files with a particular
suffix and then use make...
SUFFIX = ".pl.bit"
TARGET = "myprog.pl"
all:
@cat *${SUFFIX} >> ${TARGET }
That will work fine, b
Ok since I'm new to Perl I've written this fairly simple script to add
number from a text file, I have about 20-30 of these file with different
names and I would like to know how to add this to my script, I know how to
do it korn shell but in a perl script I'm really now sure, can anyone
point
oops sorry put an 'e' after the regexp in the end
Ramprasad A Padmanabhan wrote:
> This may not be the best way But I wud work fine
>
> sub remove_space {
> my($s)=@_;
> $s=~s/\s+//g;
> return $s;
> }
>
> while(){
> s/^(.*?)\s+(.*)$/$1.remove_space($2)/
> print;
>
> }
>
>
> Why not splitting on whitespaces and joining the pieces together ? E.g.
Because it won't work : "michael mac douglas" will give
"[EMAIL PROTECTED]" not "[EMAIL PROTECTED]"
Vincent.
> -Original Message-
> From: Thorsten Dieckhoff [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September
On Wednesday, Sep 18, 2002, at 06:18 US/Pacific, pravesh biyaNI wrote:
> pravesh biyaNI wrote:
>
>> Use of uninitialized value in concatenation (.) or string at log.pl
>>
>> line no 17 is a for loop
>>
>>
>> for ($i =0; $i < $ line_number ; ++ $ i)
>>
>> the value of line_number is 1000
[..]
tw
Hi
I am using a two dimentional array!! but the script on running gives
an error
global symbol requires explicit package name.
how to use my () with a two dimentional array
help awaited
pravesh
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
On Wed, 18 Sep 2002, Panel Vincent - A53 wrote:
> I have a problem with a regular expression :
>
> I process a text file with a list of names.
>
> I would like to reformat names like
>
> Francois de la Varenne
> Macha Meril
> BuzzMac Cormack
>
> (there must be at least two words in t
> -Original Message-
> From: pravesh biyaNI [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 18, 2002 3:56 PM
> To: [EMAIL PROTECTED]
> Subject: how to initialise a two dimensional array
>
>
> Hi
> I am using a two dimentional array!! but the script on
> running gives
> an
you only need to declare with my() the first array. all the other arrays are
just references to anonymous arrays (if you create the 2-d array like most
people do).
ex:
my(@arr);
$arr[0] = [ qw( 1 2 3 4 5 ) ];
> -Original Message-
> From: pravesh biyaNI [mailto:[EMAIL PROTECTED]]
> Sen
On Wed, 18 Sep 2002, James Parsons wrote:
> Ok since I'm new to Perl I've written this fairly simple script to add
> number from a text file, I have about 20-30 of these file with different
> names and I would like to know how to add this to my script, I know how to
> do it korn shell but in a
On Wed, 2002-09-18 at 09:56, pravesh biyaNI wrote:
> Hi
> I am using a two dimentional array!! but the script on running gives
> an error
>
> global symbol requires explicit package name.
>
> how to use my () with a two dimentional array
>
> help awaited
> pravesh
First you must recognize t
On Wednesday, September 18, 2002, at 08:22 AM, Anthony Saffer wrote:
> Hello Again All,
Howdy.
> Perhaps if you all saw my logic during this script it would help you
> understand what I am trying to do and maybe see a bit better what is
> failing. Here is my code again, but fully commented..
On Wednesday, Sep 18, 2002, at 05:12 US/Pacific, Cricker wrote:
> Thanks, but I thought that modules were for submitting to CPAN.
a reasonable approach, in the long run, since you will find it
easier to install for both yourself and everyone else, IF you
build them in a way that is CPAN 'ready'
>
> Why dont you just define the function outside and call them from inside
> your master function
>
> Bernd Prager wrote:
> >
> > I run into a problem and would appreciate some help.
> >
> > I'd like to write a subroutine that parses an XML file.
> > I use XML::Parse and one way that works i
Hi List ,
I have a directory that I want to read . Lets say the name of the directory
is my scripts (Windows platform ) . In this directory is text files . What I
want to do is read the directory and extract 2 lines out of each text file .
So far I'm able to create an Array but I'm not sure how
Hi, i am using a fax server from a perl webpage, but i cant send faxes
because the file permitions is not correct, thus i want to run a chmod
command eg. " chmod 777 /usr/local/www/fax/* " in order to enable the faxing
to work, but my question is: How do you execute the command from a .pl
file?? t
> -Original Message-
> From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED]]
> Sent: 19 September 2002 23:57
> To: Perl beginners
> Subject: Re: Regexp
>
>
> On Wed, 18 Sep 2002, Panel Vincent - A53 wrote:
>
> > I would like to reformat names like
> >
> > Francois de la Varenne
> >
Hi All:
This is a convoluted problem and I hope I can describe it properly.
I have about 90 html pages. I am extracting a small amount of
information from each page and using that to create 90 more pages elsewhere
in the site.
What is happening is that I'm getting t
On Wed, 18 Sep 2002, Willem Pretorius wrote:
> Hi, i am using a fax server from a perl webpage, but i cant send faxes
> because the file permitions is not correct, thus i want to run a chmod
> command eg. " chmod 777 /usr/local/www/fax/* " in order to enable the faxing
> to work, but my question
Hello Everyone,
Here is the final code for my replacement script. I am about to test it out but I
think it will work. Thanks to all who helped!!
#!/usr/bin/perl -w
use File::Find;
my $FileCount = 0;
my $LineCount = 0;
sub process_files {
my $FinalString = "";
my $ConvertedText = "";
> -Original Message-
> From: Willem Pretorius [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 18, 2002 10:36 AM
> To: [EMAIL PROTECTED]
> Subject: RE: file execution from a perl file
>
>
> Hi, i am using a fax server from a perl webpage, but i cant send faxes
> because the file p
just:
$hereiam[0][0] = "Things";
$hereiam[0][1] = " Eye ";
$hereiam[0][2] = "always";
$hereiam[0][3] = "wanted ";
$hereiam[1][0] = "blahhh";
$hereiam[1][1] = "blahh";
$hereiam[1][2]= "blah";
> -Ursprüngliche Nachricht-
> Von: Nikola Janceski [mailto:[EMAIL PROTECTED]]
> Gesendet am: Mi
if you have a list of numbers:
67, 50, 78, 12, 19, 98, 33, 55, 10, 8, 39, 48, 13, 70, 36, 87, 82, 44, 32,
78, 9,
let´s say you have 500 numbers of the range between 10 and 100.
What you really want are groups each with 3 numbers.
The summe of the numbers in a group should be near as possibl
Anyone know of a good PHP hosting company in Canada?
---
Colonel Nathan R. Jessop
Commanding Officer
Marine Ground Forces
Guatanamo Bay, Cuba
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
F
You might want to try one more thing before you put it away. Add 'use
strict'. It's a bit of a pain at first, but it's a very good habit to get
into.
-Original Message-
From: Anthony Saffer [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, September 18, 2002 8:01 AM
To: Perl Beginners List
S
i have a source code for a bot which is extremely huge. i split it up into
several files, i.e:
source1.pl
source2.pl
source3.pl
etc..
and in the main executable file..
require("source1.pl");
require("source2.pl");
require("source3.pl");
then run the main executable file, and it'll load each other
You don't need to write anything as a module per se. You can write a library
instead, which merely contains the vars, subs and the like that you re-use
often. Name it with a .pl extenstion. Then all you have to do is
require "/path/libname.pl";
at the start of your code.
--
To unsubscr
Hi there,
Does Perl have a function like the UNIX head.
e.g. I have a file with a header - and I only need the data from line
100 and forward where the single lines are put in to a array for further
"treatment".
I know Perl can do it but how??
Thanks.
Cheers,
Jakob
--
To unsubscribe, e
Angerstein wrote at Wed, 18 Sep 2002 17:20:29 +0200:
> if you have a list of numbers:
> ...
> What you really want are groups each with 3 numbers.
>
> The summe of the numbers in a group should be near as possible on the
> average value.
>
> My "simple" idea:
> sort the numbers.
> put the firs
#@files contains filenames, let's say with paths prepended
for $name (@files) {
if $name =~ m/.txt$/ {
open FH, "< $name" or die $!;
do something...
}
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
You could write your own function that is a for loop that counts until
100, putting each line into the array and quits would work.
There may be a more elegant way, though...
Matt
On Wed, 2002-09-18 at 09:31, Jakob Kofoed wrote:
>
> Hi there,
>
> Does Perl have a function like the UNIX head.
>e.g. I have a file with a header - and I only need the data from line
>100 and forward where the single lines are put in to a array for further
>"treatment".
If you are SURE of consistent formedness in your input file (data will always
be at lines 100+) you could use the $. var, which holds the
Bernd Prager wrote:
>>
>> Why dont you just define the function outside and call them from inside
>> your master function
>>
>> Bernd Prager wrote:
>> >
>> > I run into a problem and would appreciate some help.
>> >
>> > I'd like to write a subroutine that parses an XML file.
>> > I use XML::
> -Original Message-
> From: Janek Schleicher [mailto:[EMAIL PROTECTED]]
> Sent: 18 September 2002 16:34
> To: [EMAIL PROTECTED]
> Subject: Re: lots of numbers...
>
>
> I think, it's better to weight the sorted numbers
> with their sum rank, in the above example it would be:
>
> Of c
Sudarshan Raghavan wrote:
>
> On Wed, 18 Sep 2002, Panel Vincent - A53 wrote:
>
> > I have a problem with a regular expression :
> >
> > I process a text file with a list of names.
> >
> > I would like to reformat names like
> >
> > Francois de la Varenne
> > Macha Meril
> > BuzzMac Corm
Hey all,
I have a small array with field names that I would like to store them in a
string so that I can include it in an SQL string later.
ie:
@Fields = ("field1","field2","field3");
I want $SQLFields = "field1,field2,field3";
of course $SQLField = "@Fields"; returns the list "field1 field2
Mat Harris wrote:
> i would reall like to start creating my own modules for all those
> regularly used bit and pieces, but i don't know where to start. i have
> read perldoc perlmod and sources of loads of other modules but nothing..
>
> if i laid down a small scenario, could someone help me mod
my $SQLfields = join ',', @Fields;
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Simon Tomlinson wrote:
> Hi
>
> I want to put a hash into each element of an array. I do it like the
> following bit of code. When I iterate round my hash before putting it in
> the array of the hash values/keys are there. However, when I iterate
> through the hash after putting it in the arr
Anthony Saffer wrote:
>
> Good Morning Everyone,
Hello,
> Got another question: I wrote my first Perl script last night and
> it seemed to be error free on Windows. But when I uploaded it to
> Linux (RH 7.3) it threw an error that I don't understand. From a
> Google search it seems there could
Hello
Here is a very simple prblem which unfortunatly i am not able to solve.
I want to compare a character to a variable and do accordingly. I am
using an if loop for this!!
but it seems that even if the variable is not equal to that character,
it is entering the loop.. i am not able to figur
You're confusing = which means assign to with == which asks the
question, are these equal (numerically) or its cousin eq which asks are
these the same characters.
James
On Wednesday, September 18, 2002, at 12:48 PM, pravesh biyaNI wrote:
> Hello
> Here is a very simple prblem which unfortuna
See in-line comments:
> -Original Message-
> From: pravesh biyaNI [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, September 18, 2002 1:48 PM
> To: [EMAIL PROTECTED]
> Subject: simple problem
>
>
> Hello
> Here is a very simple prblem which unfortunatly i am not
> able to solve.
> I want
On Tue, 17 Sep 2002 22:53:12 +0200, [EMAIL PROTECTED] (Prabu
Subroto) wrote:
> Dear my friends,
>
>Any body would be so kind to teach me how to put label and input of a
>form in one row.
>I am meaning like this :
>"
>Name of person : [input column with entry widget]
>"
Try this one:
##
Chris Federico wrote:
> Hi List ,
>
>
> I have a directory that I want to read . Lets say the name of the
> directory
> is my scripts (Windows platform ) . In this directory is text files . What
> I want to do is read the directory and extract 2 lines out of each text
> file . So far I'm able
James Parsons wrote:
>
> Ok since I'm new to Perl I've written this fairly simple script to add
> number from a text file, I have about 20-30 of these file with different
> names and I would like to know how to add this to my script, I know how to
> do it korn shell but in a perl script I'm rea
Chris Federico wrote:
>
> Hi List ,
Hello,
> I have a directory that I want to read . Lets say the name of the directory
> is my scripts (Windows platform ) . In this directory is text files . What I
> want to do is read the directory and extract 2 lines out of each text file .
> So far I'm ab
thanks.. prblm solved!!!
regards
pravesh
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
do you want to send a text attachment in addition to
an html embedded email?
or do you want to show one or the other, ie - if the
person has their email client to only accept text
msgs, it'll show just the plain text message,
otherwise it shows the html...if this is the case, you
can send a mime
Nkuipers wrote:
>>e.g. I have a file with a header - and I only need the data from line
>>100 and forward where the single lines are put in to a array for further
>>"treatment".
>
> If you are SURE of consistent formedness in your input file (data will
> always be at lines 100+) you could use th
Nkuipers wrote at Wed, 18 Sep 2002 18:53:44 +0200:
>>e.g. I have a file with a header - and I only need the data from line
>>100 and forward where the single lines are put in to a array for further
>>"treatment".
>
> If you are SURE of consistent formedness in your input file (data will always
Jeff Aa wrote at Wed, 18 Sep 2002 18:56:52 +0200:
> Your analysis is interesting. I am no mathemagician either, but it
> occurs to me that it would be easy to code your analysis more
> efficiently than using the sum rank, something like this: (not
> debuggered)
>
> use strict;
>
> # Note that t
Thanks to the people on this list I've been able to create a form
submission page that writes team data for a fps league to a data file. I
can also call up that data and present it 'nicely' on a web browser. The
next step for me is to be able to submit the name of a clan I want to drop
from
Scott Taylor wrote:
> Hey all,
>
> I have a small array with field names that I would like to store them in a
> string so that I can include it in an SQL string later.
>
> ie:
> @Fields = ("field1","field2","field3");
>
> I want $SQLFields = "field1,field2,field3";
>
> of course $SQLField = "
Pravesh Biyani wrote:
> Hello
> Here is a very simple prblem which unfortunatly i am not able to solve.
> I want to compare a character to a variable and do accordingly. I am
> using an if loop for this!!
>
> but it seems that even if the variable is not equal to that character,
> it is enterin
Hi -
I would be happy to help. Please give me a _small_ piece
of code to modularize and details, and I will help you step
thru the process. Also let me know about your environment and
level of experience.
Aloha => Beau.
PS: the best tutorial on the process I have seen is in
"Effective Perl Prog
On Tue, Sep 17, 2002 at 06:25:42PM -, Cricker wrote:
> I'd like to break my perl script into several files (because it is getting
> awfully large, with all the callbacks from Tk), but still keep the lexical
> scope. Maybe I'm thinking too much like a C programmer, but I would just
> like to #
On Wed, Sep 18, 2002 at 12:12:34PM -, Cricker wrote:
> Thanks, but I thought that modules were for submitting to CPAN. Don't I
> have to go through all the @ISA and Exporter:: stuff if I write a module? I
> would like to get away with something simpler.
Modules are for splitting code into m
ok, how about this:
user opens a webpage, the module checks where a cookie is set in the client
browser, if yes then check the cookie id against a mysql database. id the
cookis is valid then return an array like:
qw/valid, cookieid/
or if its invalid then:
qw/invalid, remoteip/
alsom, how do
On Tue, Sep 17, 2002 at 03:15:44PM -0400, Bernd Prager wrote:
> I'd like to write a subroutine that parses an XML file.
> I use XML::Parse and one way that works is to define
> subroutines with the name of an XML tag and every appearance
> of that tag calls the appropriate subroutine.
>
> Since I
actually scrap that. if you could just tell me how to pass configs and
variables to the module for use in a sub, that would be a great help
On Wed, Sep 18, 2002 at 08:32:25 +0100, Mat Harris wrote:
> ok, how about this:
>
> user opens a webpage, the module checks where a cookie is set in the cli
Ron Woodall wrote:
>
> Hi All:
Hello,
> This is a convoluted problem and I hope I can describe it properly.
>
> I have about 90 html pages. I am extracting a small amount of
> information from each page and using that to create 90 more pages elsewhere
> in the site.
>
>
Steveo wrote:
> Thanks to the people on this list I've been able to create a form
> submission page that writes team data for a fps league to a data file. I
> can also call up that data and present it 'nicely' on a web browser. The
> next step for me is to be able to submit the name of a clan I
Anthony Saffer wrote:
>
> Hello Everyone,
Hello,
> Here is the final code for my replacement script. I am about to test it
> out but I think it will work. Thanks to all who helped!!
>
> #!/usr/bin/perl -w
>
> use File::Find;
>
> my $FileCount = 0;
> my $LineCount = 0;
>
> sub process_files
-Original Message-
From: Janek Schleicher [mailto:[EMAIL PROTECTED]]
Sent: 18 September 2002 18:32
To: [EMAIL PROTECTED]
Subject: RE: lots of numbers...
> You meant my $iterations = int( scalar @numbers / 3 );
> (However, the scalar cast isn't necessary)
>
> my $iterations = int(@numb
You'll need to use a program like ImageMagick to conver the initial
message into the TIFF format, the universal FAX transmision format.
Then you have to use something like "sendfax" another linux program to send
the fax out, once you have the TIFF file sending the fax is easy,
I'm short on time
Hey Timothy,
My MUA believes you used Internet Mail Service (5.5.2650.21)
to write the following on Wednesday, September 18, 2002 at 11:55:12 AM.
I would also suggest 'use warnings;' instead of -w on your #!/perl
line. See perldoc perllexwarn for more information.
TJ> You might wan
1 - 100 of 111 matches
Mail list logo