Using GetOpt::Long

2002-09-18 Thread David Samuelsson (PAC)
I found this module was a part off the package, and tried it out, it works as i want. I have some troubles though, i am going to use quite a lot of sub routines in my scrip, how can i define and structure so that the commandline switches will actually be the subs executed? for example i have t

Re: Array of Hashes

2002-09-18 Thread Dharmender Rai
assign the reference of the hash. --- Simon Tomlinson <[EMAIL PROTECTED]> 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, w

Re: How to delete data from a file

2002-09-18 Thread Dharmender Rai
Steve , You are using a flat ascii file. Now you have 2 options: [1] For Huge Files: Overwrite the first character of the line to be deleted with a special character like '#' or '$' e.t.c. Although this approach will make deletion faster, the size of the file will be large as the deleted data

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Dharmender Rai
you can try out : use, require and eval --- Cricker <[EMAIL PROTECTED]> 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 cal

Using Delta_Format in Date::Manip

2002-09-18 Thread Steve
I just read the help file for Date::Manip concerning Delta Format. Delta_Format seems to be what I want for what I want to do but I can't quite get to to work. I have this: my $diff_tot=&Delta_Format($diff,3,@format); @format is set to %MNt. But all I get printed out is "MNt". What I want

RE: how to recognize a number with regex?

2002-09-18 Thread Timothy Johnson
Okay, I guess I misunderstood. I thought that was the point. (no pun intended) -Original Message- From: nkuipers [mailto:[EMAIL PROTECTED]] Sent: Wednesday, September 18, 2002 6:29 PM To: Timothy Johnson Cc: [EMAIL PROTECTED] Subject: RE: how to recognize a number with regex? You mig

Re: how to recognize a number with regex?

2002-09-18 Thread Tanton Gibbs
That forces it to be at least two digits long. /(\d+(\.\d+)?)/ - Original Message - From: "nkuipers" <[EMAIL PROTECTED]> To: "Timothy Johnson" <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Wednesday, September 18, 2002 9:29 PM Subject: RE: how to recognize a number with regex? > Y

RE: how to recognize a number with regex?

2002-09-18 Thread nkuipers
You might want to allow no decimal point. /\d+\.?\d+/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: how to recognize a number with regex?

2002-09-18 Thread Timothy Johnson
You'll need to escape the period. $_ =~ /\d+\.\d+/; -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Wednesday, September 18, 2002 5:44 PM To: [EMAIL PROTECTED] Subject: how to recognize a number with regex? hi what do a regex look like that only matches n

how to recognize a number with regex?

2002-09-18 Thread Martin A. Hansen
hi what do a regex look like that only matches numbers of the format (the length of the number doesnt matter its the . thats the problem) 1233.1234 or 1234 martin -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Final Code (I think it's gonna work!)

2002-09-18 Thread Tim Musson
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

Re: Formmail to fax

2002-09-18 Thread Tony
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

RE: lots of numbers...

2002-09-18 Thread Jeff
-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

gpg key update

2002-09-18 Thread Mat Harris
If anyone has stored my public key then please update it as i have had to change. it is really me talking, you can tell by the unecessary rambling. the new public key id is: C37D57D9 -- Mat Harris OpenGPG Public Key ID: C37D57D9 [EMAIL PROTECTED]matthewh.genestate.c

Re: Final Code (I think it's gonna work!)

2002-09-18 Thread John W. Krahn
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

Re: How to delete data from a file

2002-09-18 Thread david
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

Re: weird problem

2002-09-18 Thread John W. Krahn
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. > >

Re: creating modules

2002-09-18 Thread Mat Harris
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

Re: nested subroutines and shared variables

2002-09-18 Thread Michael Fowler
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

Re: creating modules

2002-09-18 Thread Mat Harris
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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Michael Fowler
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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Michael Fowler
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 #

RE: creating modules

2002-09-18 Thread Beau E. Cox
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

Re: simple problem

2002-09-18 Thread david
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

Re: more regexp stuff, maybe?

2002-09-18 Thread david
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 = "

How to delete data from a file

2002-09-18 Thread Steveo
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

RE: lots of numbers...

2002-09-18 Thread Janek Schleicher
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

RE: head as in "unix"

2002-09-18 Thread Janek Schleicher
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

RE: head as in "unix"

2002-09-18 Thread david
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

Re: Hotmail.com vs. MIME:Lite

2002-09-18 Thread Anthony E.
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

Re: simple problem

2002-09-18 Thread pravesh biyaNI
thanks.. prblm solved!!! regards pravesh -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Help ! Newbie here :)

2002-09-18 Thread John W. Krahn
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

Re: Newbie Question

2002-09-18 Thread John W. Krahn
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

Re: Help ! Newbie here :)

2002-09-18 Thread david
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

Re: Please...Help me. How to arrange my widget with pack

2002-09-18 Thread zentara
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: ##

RE: simple problem

2002-09-18 Thread Nikola Janceski
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

Re: simple problem

2002-09-18 Thread James Edward Gray II
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

simple problem

2002-09-18 Thread pravesh biyaNI
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

Re: Question about Error

2002-09-18 Thread John W. Krahn
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

Re: Array of Hashes

2002-09-18 Thread david
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

RE: more regexp stuff, maybe?

2002-09-18 Thread nkuipers
my $SQLfields = join ',', @Fields; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: creating modules

2002-09-18 Thread david
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

more regexp stuff, maybe?

2002-09-18 Thread Scott Taylor
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

Re: Regexp

2002-09-18 Thread John W. Krahn
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

RE: lots of numbers...

2002-09-18 Thread Jeff AA
> -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

Re: nested subroutines and shared variables

2002-09-18 Thread david
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::

RE: head as in "unix"

2002-09-18 Thread nkuipers
>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

Re: head as in "unix"

2002-09-18 Thread Matt Simonsen
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.

RE: Help ! Newbie here :)

2002-09-18 Thread nkuipers
#@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]

Re: lots of numbers...

2002-09-18 Thread Janek Schleicher
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

head as in "unix"

2002-09-18 Thread Jakob Kofoed
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

RE: Breaking up a large source file into several pieces

2002-09-18 Thread nkuipers
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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread dan
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

RE: Final Code (I think it's gonna work!)

2002-09-18 Thread Timothy Johnson
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

OT: PHP hosting

2002-09-18 Thread FlashGuy
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

lots of numbers...

2002-09-18 Thread Angerstein
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

AW: how to initialise a two dimensional array

2002-09-18 Thread Angerstein
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

RE: file execution from a perl file

2002-09-18 Thread Bob Showalter
> -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

Final Code (I think it's gonna work!)

2002-09-18 Thread Anthony Saffer
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 = "";

RE: file execution from a perl file

2002-09-18 Thread Sudarshan Raghavan
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

weird problem

2002-09-18 Thread Ron Woodall
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

RE: Regexp

2002-09-18 Thread Jeff AA
> -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 > >

RE: file execution from a perl file

2002-09-18 Thread Willem Pretorius
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

Help ! Newbie here :)

2002-09-18 Thread Federico, Chris
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

Re: nested subroutines and shared variables

2002-09-18 Thread Bernd Prager
> > 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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread drieux
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'

Re: Fully Commented Code..

2002-09-18 Thread James Edward Gray II
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..

Re: how to initialise a two dimensional array

2002-09-18 Thread Chas Owens
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

Re: Newbie Question

2002-09-18 Thread Sudarshan Raghavan
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

RE: how to initialise a two dimensional array

2002-09-18 Thread Nikola Janceski
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

RE: how to initialise a two dimensional array

2002-09-18 Thread NYIMI Jose (BMB)
> -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

Re: Regexp

2002-09-18 Thread Sudarshan Raghavan
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

how to initialise a two dimensional array

2002-09-18 Thread pravesh biyaNI
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]

Re: error

2002-09-18 Thread drieux
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

RE: Regexp

2002-09-18 Thread Panel Vincent - A53
> 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

Re: Regexp

2002-09-18 Thread Ramprasad A Padmanabhan
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; > > } > >

Newbie Question

2002-09-18 Thread James Parsons
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

RE: PERL over multiple source files

2002-09-18 Thread Robin Cragg
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

Re: Regexp

2002-09-18 Thread Ramprasad A Padmanabhan
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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Sudarshan Raghavan
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'

RE: Array of Hashes

2002-09-18 Thread Simon Tomlinson
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.

Re: nested subroutines and shared variables

2002-09-18 Thread Ramprasad A Padmanabhan
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

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Ramprasad A Padmanabhan
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

RE: Array of Hashes

2002-09-18 Thread Sudarshan Raghavan
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

RE: Array of Hashes

2002-09-18 Thread NYIMI Jose (BMB)
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";

Fully Commented Code..

2002-09-18 Thread Anthony Saffer
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{ #

Re: error

2002-09-18 Thread pravesh biyaNI
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

RE: Array of Hashes

2002-09-18 Thread Simon Tomlinson
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 = ("

RE: Array of Hashes

2002-09-18 Thread Nikola Janceski
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

Re: Question about Error

2002-09-18 Thread Anthony Saffer
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

Array of Hashes

2002-09-18 Thread Simon Tomlinson
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

RE: Question about Error

2002-09-18 Thread Nikola Janceski
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

error

2002-09-18 Thread pravesh biyaNI
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

creating modules

2002-09-18 Thread Mat Harris
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

Question about Error

2002-09-18 Thread Anthony Saffer
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

RE: One last question

2002-09-18 Thread Kipp, James
> > 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

Regexp

2002-09-18 Thread Panel Vincent - A53
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]

Re: Breaking up a large source file into several pieces

2002-09-18 Thread Cricker
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

How to grep

2002-09-18 Thread Javeed SAR
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_

Re: Timers?

2002-09-18 Thread mmaunder
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

  1   2   >