RE: Could I put commands in a variable

> For instance: > > > sub launch_viewer { > my $for_path = shift; > $message_viewer = create_main_viewer_window(); > add_main_menu($message_viewer); > add_header_list($message_viewer, $for_path); > add_message_area($message_viewer); > print get_viewer_option('Files|References'), "\n"

RE: RE: capture a website and process its data

> Hi > thanks a lot for your inputs. > > I used > Win32::OLE module > as it opens up a new instance of internet explorer with my > preferred webpage. > > now, i dont need to store all the html. i just need to store > the html from > $guts =~ /startpathwayimage(.*)endpathwayimage/; > > and

RE: capture a website and process its data

> Hi All, > > I am a beginner at perl and would need some valued advice in > the following task. Then you'll love LWP::UserAgnet and LWP:Simple > 1. I need to access a website like say, a pathway called > http://www.biocarta.com/pathfiles/h_il10Pathwa> y.asp Not sure why you need to work wit

RE: Extracting data from html structure.

> And I want to extract from it the chekbox values and their > respective channel names (contained in the link beside the > checkbox). I have checked a lot of modules on cpan but I > haven't found one that does it just the way I want it to yet. > Actually I havent found any that I can get to wo

RE: Why does this keep happening?

> I'm running perl under windows XP and I keep geting this error: > > syntax error at (Directory and filename) Line 6, near " ) > {" > syntax error at (directory and filename) line 9 near "}" > > The source code is below, but this happens with loops in > general. Any ideas? > > ---

RE: Import oddity [SOLVED!]

> Dan Muey wrote: > > Any thoughts? > > Erm, it looks okay. Maybe if you showed a complete example > and the error or warnings (or misbehavior) somebody would see > the problem. > > Here's what I was using. > > BEGIN { > pac

RE: Import oddity

> > Dan Muey wrote: > > Any thoughts? > > Erm, it looks okay. Maybe if you showed a complete example > and the error or warnings (or misbehavior) somebody would see > the problem. > > Here's what I was using. > > BEGIN { >

RE: Import oddity

> Dan Muey wrote: > > I tried both and no go. All is well (IE the thigns specified > > are Exported to the script) if I do not have > strict->import; (Which makes > > the script act as if they had 'use strict;' in the script) > > Did you "use s

RE: Import oddity

> Dan Muey wrote: > >>sub import { > >>my $class = shift; > >>$class->SUPER::import(@_); > >>strict->import; > >>} > >> > >> I believe that will fix it. Not 100% sure though. Never > >> tried it. ;

RE: Import oddity

> On Feb 17, 2004, at 7:56 AM, Dan Muey wrote: > > > Hello, > > > > Weird thing here: > > > > I get a variable from a module via @EXPORT_OK > > like so: > > > > use Foo::Monkey '$howdy'; # import the variable $howdy > > print

Import oddity

Hello, Weird thing here: I get a variable from a module via @EXPORT_OK like so: use Foo::Monkey '$howdy'; # import the variable $howdy print $howdy; Works perfect. Now if I add strict->import; to my module's import function like so: package Foo::Monkey;; [ standard goodies cut] use base qw(Ex

RE: [OT] Apache internal server redirects

> I have an internal server that I need to pass external > visitors to from a web page. The internal server isn't set > up to go through the firewall so I am looking for a way to > make web server (which does play nice) to access the other > server via http and let a user access the files and

RE: Getting croak or carp into variable ?

> there are at least a couple of ways of doing that: > > #!/usr/bin/perl -w > use strict; > > BEGIN{ > use subs qw(Carp::die); > use vars qw($e); > sub Carp::die{ $e = "Carp::die: @_" } > } > > use Carp; > > croak "croaking"; > > print "after croak \$e is: $e"; > > __E

RE: Getting croak or carp into variable ?

> Dan Muey wrote: > > [snip] > > > $SIG{__WARN__} = ''; # or is undef or delete better?? > $SIG{__DIE__} = > > ''; # or is undef or delete better?? > > > > That works like a charm but it does not work with $SIG{__DIE__} for

RE: Getting croak or carp into variable ?

> >I am using a module that does use Carp; and you > >can specify whther you want croak or carp on an error > >Which is cool. But there is no way to specify anythign > >else besides those two. > > > >What I'd like to do is get any errors into a variable: > > You want Carp::shortmess(). > > per

RE: Getting croak or carp into variable ?

> perl -MCarp -e '$SIG{__WARN__} = sub { $err = shift; }; > carp "Error!\n"; print "We caught $err";' > This works great! And changing $SIG{__WARN__} to '' will return default behaviour correct? (Same thign with __DIE__ ??) > Strangely though, this did not work for me, though I expected it to:

RE: Program close

> Hi Howdy > > When I run a very simple Perl program, it > closes immediately after it has > done. So that I can't even see the output. How > can I solve this? > Don't use windows! :) Or try executeing it from a dos prompt directly. >

RE: Getting croak or carp into variable ?

> On Feb 10, 2004, at 9:56 AM, Dan Muey wrote: > > > Hello List, > > > > I am using a module that does use Carp; and you > > can specify whther you want croak or carp on an error > > Which is cool. But there is no way to specify anythign > > else besid

Getting croak or carp into variable ?

Hello List, I am using a module that does use Carp; and you can specify whther you want croak or carp on an error Which is cool. But there is no way to specify anythign else besides those two. So the way it is you just do: my $res = funktion('foobarmonkey',err_doer => 'carp'); And it will do

RE: How to use the arguments to use() in the package being used

> Dan Muey wrote: > > > > > > > But did you perldoc? Munging source may sometimes be useful, > > > > Shamefully, no :( > > I usually do but this time I was just backwards! > > Cool. I'm afraid I sent the response before I noticed the > s

RE: How to use the arguments to use() in the package being used

> Dan Muey wrote: > > > Howdy, > > The subject says it all believe it or not :) > > > > What I'm trying to figure out is how to pass an argument (pragma I > > believe is the proper term) to use() and do sonethign in > the package > > based on

RE: Module for Country/Country Codes Lists

> We enumberated our needs here: > http://benschmaus.com/cgi-bin/twiki/view/Main/WwwFormCountryList > So, is there a good module for doing that on CPAN that is also actively maintained > and updated? If not I'll include it my upcoming module perhaps (no not Foo::monkey ;p) -- To unsubscribe, e

RE: How to use the arguments to use() in the package being used

> On Feb 4, Dan Muey said: > > ># for old time's sake we'll just use our favorite module > >use Foo::Monkey qw(:Foo :Bar -doamazingthings); > > Well, depending on what you want to do with the arguments, > you might want to use the Exporter module to handle e

How to use the arguments to use() in the package being used

Howdy, The subject says it all believe it or not :) What I'm trying to figure out is how to pass an argument (pragma I believe is the proper term) to use() and do sonethign in the package based on it. I've looked at CGI.pm source but can't seem to track it down. (Similar idea as to CGIs -olds

RE: script problem

> Hi everyone, Howdy. > > I am created this script to send e-mails (see below). > I get this error when I try to run it: > use strict; use warnings; > Number found where operator expected at > C:\scriptz\test\NEWSCR~1.CGI line 15, ne ar "The IP address > for the interface that caused the

RE: Different results Command Line/CGI

> I have this script stolen and modified from somewhere Stealling is bad! :) > > #!/usr/bin/perl -w > use strict; > use File::Find; > print "Content-type: text/html\n\n"; > > my $u=shift; > my $sizes = 0; > # replace this with your absolute path > my $path = "/home/$u/"; > > find (sub {$si

RE: New Perl User needs help with POST in perl

> I have written my HTML code to where it uses POST to collect > information. Where do I start to write a script that collects > the data from the web site, places the input into a dbm file, use CGI 'param'; my $email = param('email'); dbm file?? perldoc -f open > then places a 1 next to it li

RE: Use and Require

> > Mallik wrote: > > > > > > What is the difference between Use and Require. > > > > See > > > > perldoc -f use > > perldoc -f require > > > > Why do you ask? > > > > /R > > > > > > Wow such a civilized answer. Some would say... > > S R Q I R E Who is Senior Qire? > > This is such a

RE: Zip using Perl

> On Wed, 28 Jan 2004 15:37:12 -0500 > "RL" <[EMAIL PROTECTED]> wrote: > > > I would like to "zip" a file using perl script. I used following > > command:- > > > > system ("zip "); > > > > However this command fails when the filename is more than 8 > > characters. Why not try Archive::Zip in

RE: Help with options

> Hi, > > I have a script that command options are taken and would like > to know how print out the options when the options are > missing from the command line. Or how to do a -h to print out > the options. > There are module sto help you process switches and what not. For really simple stuf

RE: Automated script to connect to a web site and change the Password

> Dear Friends, > > I need to write a Perl CGI script that connects to > a website (like Yahoo) and change the Password for > my user. I don't want to do it manually. It should > be handled by the script. > I've done similar thigns using LWP::UserAgent to log in and submit forms with certain da

RE: can i do it with perl ?

> I there, > Ello! > I need to write a web database application using > perl, and i need a way that when the users logs into > the system i download all the information regarding > to the user to its local computer and make all the > transaction locally. After that, when the user logs

RE: Best Encyption module for this task/goal

> Howdy list, > > I made a script that use Crypt::OpenPGP to > encrypt/decrypt some data. > > I was thinking about testing out some other Encryption > modules to see if any worked faster/ were more portable. > Since I'm not an encyption master I thoguht I'd ask for > input from any experience

Best Encyption module for this task/goal

Howdy list, I made a script that use Crypt::OpenPGP to encrypt/decrypt some data. I was thinking about testing out some other Encryption modules to see if any worked faster/ were more portable. Since I'm not an encyption master I thoguht I'd ask for input from any experienced in the matter.

RE: Survey : Max size allowable for slurping files

> Dan Anderson wrote: > > > > > Very true. But you also need to look at what you're doing. > A spider > > that indexes or coallates pages across several sites might need to > > slurp up a large number of pages -- which even at a few kilobytes a > > piece would be costly on system resources.

RE: Survey : Max size allowable for slurping files

> Here's another argument against slurping: When you slurp a > file all at once, even if your program isn't using up much of > the CPU, on many machines it will slow down performance > considerably if you slurp a large file (large, of course, is > still sometimes relative). If that is the onl

RE: Survey : Max size allowable for slurping files

> > Good comparison, I never see advice to use no warnigns and > no strict > > though :) > > I've actually seen it a few times in code, but it's usually surrounded > by: > > ## > ## > #WARNING!! > ## > # Warnings / Strict

RE: Survey : Max size allowable for slurping files

> > But I see a lot of "don't slurp that" and I was hoping for more > > clear reasons/situatuions to or not to slurp so people > positn code can have a better idea why a perosn said: > > "do(n't) slurp your file here" > > > > Basically we need to expalin why more: > > > > - Don't slurp this beca

RE: Survey : Max size allowable for slurping files

> On Thu, 2004-01-22 at 16:16, Dan Muey wrote: > > > On Thu, 2004-01-22 at 13:18, Dan Muey wrote: > > > > There are always comments like "you can slurp the file > as long as > > > > it's not too big" or "becareful not to

RE: Survey : Max size allowable for slurping files

> On Thu, 2004-01-22 at 13:18, Dan Muey wrote: > > There are always comments like "you can slurp the file as > > long as it's not too big" or "becareful not to slurp a > > really big file or you'll be in trouble". > > I'd like to ad

RE: Covert Date to week number

> > Is their a way in PERL to covert a date to a week number > Sure , why not? You'd need to know the date format to start of course. I don't mess with dates personally a lot so I'd say have a look on search.cpan.org for a module to do that. Also perldoc may be able to help you. Sorry to be

RE: Newbie

> Well, I'm a newbie. Just got started in Perl and was stunned > by its power. > > The thing is i'm running the scripts in WinXP. Can you tell > how to use CGI scripts in XP, because if ai try to set a CGI > script as ACTION in a forme it just gets read and doesn't execute. I'm assuming you ar

RE: Survey : Max size allowable for slurping files

> On Jan 22, 2004, at 12:18 PM, Dan Muey wrote: > > > There are always comments like "you can slurp the file as > long as it's > > not too big" or "becareful not to slurp a really big file > or you'll be > > in trouble". > &g

Survey : Max size allowable for slurping files

There are always comments like "you can slurp the file as long as it's not too big" or "becareful not to slurp a really big file or you'll be in trouble". So what I'd like to survey is what would be what the safest max size of a file that one should ever slurp and why? (IE if you have

RE: On import v. Just Do It.

> On Jan 20, 2004, at 9:19 AM, Dan Muey wrote: > > > Oops left out a sentence > > sorry for the delay. > > >> p0: yes, one can use an import() from a package > >> to make something like the scam of 'require in line' > > > > Wh

RE: Upload files and directories

Oohhh this is how its related to perl, sorry the new subject line threw me. > I am in dire need of a script that will upload everything > from one server to another one that I can cron. Right now I > have to do it by hand and with more and more updates being > done to the site, I need a way to

RE: Calling SUPER::constructor in the constructor

> Is it possible to call the constructor that a function > inherits from its parent? I tried calling SUPER:: and > SUPER-> in a constructor and got errors. Am i correct in > assuming that if I rewrite the constructor that a copy of the > parent object won't be available? > Perhaps some exam

RE: Upload files and directories (MORE INFO)

> I am transferring the data from a Redhat 9 machine to an IIS There's your first mistake, moving *from* Redhat *to* IIS :) > server run by my ISP. I just tried running rsync and it was Assuming it was using ssh, does the winblows server have ssh servce on it? > not responsive (left it on o

RE: search an replace

> Hi > > This scripts sucks in a 109mb file and i'm trying to do a > search and replace on unxtime to the format from strftime. > Which is working... > > But I run this system call and it took allnight to run :( > > So I killed it... Any other suggestions to reach my goal. > > Yes

RE: format localtime()

> Hi > > I have the following script that sucks in a file and converts > unix timestamp to human readable.. > > The Goal is to do a search and replace of unix time to the > format i need. But I'm just trying to get it to print in the > format i need first... > > I cant get localtime to prin

Re: On import v. Just Do It.

Oops left out a sentence > p0: yes, one can use an import() from a package > to make something like the scam of 'require in line' Why is it a scam if that's what I want to do for myself? > for the twin pragma of 'use strict' and 'use warnings' > { oye! } > > p1: But there is this minor tech

RE: On import v. Just Do It.

> p0: yes, one can use an import() from a package > to make something like the scam of 'require in line' Why is it a scam if that's what I want to do for myself? > for the twin pragma of 'use strict' and 'use warnings' > { oye! } > > p1: But there is this minor technical overhead that > comes wi

RE: Use strict inside module to apply to entire script?

> On Saturday, January 17, 2004, at 06:21 PM, Dan Muey wrote: > > I was curious if it's possible to have a module like so: > > > > package Foo:Monkey; > > > > use strict; > > use warnings; > > You can call "strict->import&qu

RE: Terminating script if file does not exist

> Basically the script runs and looks for a file in a certain > directory. If the file is there, the script continues to run > and process the file, but if the file is not there the script > should just exit. > > Any ideas on how to do this? Beside die() you may also want to check it. if(-e

RE: How to send results to more than one recipient

> > Thanks for the response but that doesn't seem to work either. > Maybe it would be easier just to create a distribution list > on the email server and just put that address in my script. > It doesn't work, looping over an array does not work? for(@emaillist) { # pipe $_ to qmail i

RE: Terminating script if file does not exist

> Perlwannabe wrote: > > > > Basically the script runs and looks for a file in a certain > directory. > > If the file is there, the script continues to run and process the > > file, but if the file is not there the script should just exit. > > > > Any ideas on how to do this? > > open FILE,

Use strict inside module to apply to entire script?

Howdy! I was curious if it's possible to have a module like so: package Foo:Monkey; use strict; use warnings; Then in my script: #!/usr/bin/perl use Foo::Monkey; And have that enable strict and warnings for my script. IE it would act as if I'd done: #!/usr/bin/perl use strict; use warnings

RE: Why isn't perl used more in business and industry

> http://www.perl.com/pub/a/2004/01/09/survey.html Nice! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Why isn't perl used more in business and industry

> In a job interview last year, I was talking to a company who > was in the > process of moving their big server application to Java from > its current > Perl base. They told me they felt like Perl was not ready for > professional server environments, but they had had a lot of success > with

RE: Why isn't perl used more in business and industry

> Which has made me wonder more then once if in a security > through obscurity approach sites pass perl scripts off as ASP, etc. > Maybe, I don't see why I'd want to make people think I'm using insecure stuff when I'm really using the best, but maybe. > For instance, Ebay's servers are run by

RE: Why isn't perl used more in business and industry

> Most of the scripts I see end in an extension like .jsp, > .asp, .dll, or something which says that they aren't perl. > Is there a reason more businesses and online companies don't use perl? - People like to spend money for stuff for no goods reason. - Are those on servers you work with? Thos

RE: JPG FILE DOUBTS

> > > Hello i wanna know what Perl module can I use and what Howdy > commands to do the folowing: 1-Check to see if the file is a 1) use Imager, GD, Image::Magick, search.cpan.org search for image,jpg, jpeg > valid jpg file 2-Check the file size 2) perldoc -f stat > > Thanks in advance >

RE: perl loan scripts/software

> Hi there, > > I need to find out if there is a perl software, > script for loans managament. Is for a client that > give loans to their customers and want to have control > over the payments, the interest receive, etc. > Does anyone knows about any perl software for like > that ? Do you

RE: redirect with cgi.pm

> >redirect() does a header like header(), the first header > that gets sent > >is the header, the rest is content, even if The contetn > looks just like > >a header. > > Thanks for the correction, I have not found the time to read > "CGI Programming with Perl" thoroughly and did not realize

RE: decoding a base64 file?

> Hello folks, > > If I encode a file with MIME::Base64 with the following > script, encode_base64.pl. The > > question is; how do I decode the file? I use the following > script, decode_base64.pl to > > decode back to the original source but that did not work. > > Thank you... [snip] >

RE: redirect with cgi.pm

> > Hi, > > like this: > > #!/usr/bin/perl -w > > use strict; > use CGI; > use CGI::Carp qw(fatalsToBrowser); > > my $q = new CGI; > > print $q->header > # do this - do that, using $q > > print $q->redirect("/thanks.html"); > > - Jan redirect() does a header like header(), the first heade

RE: Drawing an Arc at an angle.

> On Thu, 08 Jan 2004 09:44:31 -0500, [EMAIL PROTECTED] (Zentara) > wrote: > > >On Wed, 7 Jan 2004 10:53:20 -0600, [EMAIL PROTECTED] (Dan Muey) > >wrote: > > > >>Thanks! Even more to add to my look into list! > > > >Yeah upon futher thought, you pr

RE: One line variable declaration with multiple conditions

> > I think I better see the context at this point. > note, as I presume you did The issue is resolved, but for the die hards here goes... I'm wanted to figure out my method of attack before I did the whole thing but here is an example that will illustrate the basic idea hopefully: #!/usr/bin/p

RE: One line variable declaration with multiple conditions

> On Jan 8, 2004, at 7:45 AM, Dan Muey wrote: > [..] > > > > Except I need to do this to about ten variabels all in a row. Which > > gives me 10 lines with Bob's way and 40 with my very first example. > > Boo for that! :) > > > [..] > > Have yo

RE: printf sprintf

> > > What is the difference. The only I see is that printf can > > > > One difference is printf prints it's output and sprintf > returns it';s > value. > > > > printf ... > > my $formatted_goodies = sprintf ... > > > > > take a filehandle? But what use would that be. > > > > > > > To format

RE: printf sprintf

> What is the difference. The only I see is that printf can One difference is printf prints it's output and sprintf returns it';s value. printf ... my $formatted_goodies = sprintf ... > take a filehandle? But what use would that be. > To format the contents of it. For instance, you might hav

RE: One line variable declaration with multiple conditions

> Dan Muey wrote: > > > BTW - I'm not really using these variable names, only using > them here > > ot help clarify my goal. > > Why not? They looked very good to me, at least in the > context of the question at hand. One of the best aspects of In cont

RE: One line variable declaration with multiple conditions

> Dan Muey wrote: > > > Howdy list. > > I'm trying to one lineify this: > > > > my $guts = $firstchoice || ''; > > if(!$guts && $use_second_choice_if_first_is_empty) { > > $guts = $secondchoice; > > } > >

RE: coping txt files over a peer to peer.

> Hello folks, Howdy, Funny I was just thinking about Sockets today. I don't use them nitty gritty like this but I would assume you need to do multiple send/receive/accept in a little session via your own prtocol. Something like: Client> hello Server> howdy Client> NAME fred.txt Server> NAMEIS

RE: One line variable declaration with multiple conditions

> > Howdy list. > > I'm trying to one lineify this: > > > > my $guts = $firstchoice || ''; > > if(!$guts && $use_second_choice_if_first_is_empty) { > > $guts = $secondchoice; > > } > > > > Basically > > my $guts = $firstchoice || $secondchoic || ''; > > Would be perfect except I only want t

RE: One line variable declaration with multiple conditions

> Dan Muey wrote: > > Howdy list. > > I'm trying to one lineify this: > > > > my $guts = $firstchoice || ''; > > if(!$guts && $use_second_choice_if_first_is_empty) {$guts = > > $secondchoice; } > > > > Basical

RE: One line variable declaration with multiple conditions

> > Howdy list. > > I'm trying to one lineify this: > > > > my $guts = $firstchoice || ''; > > if(!$guts && $use_second_choice_if_first_is_empty) { > > $guts = $secondchoice; > > } > > > > Basically > > my $guts = $firstchoice || $secondchoic || ''; > > Would be perfect except I only want t

RE: One line variable declaration with multiple conditions

> > On Jan 7, 2004, at 2:20 PM, Dan Muey wrote: > > > > > Is that possible to do with one line? > > technically no, because you needed > my ($firstchoice, $use_second_choice_if_first_is_empty); > my $secondchoice = 's2'; Sorry, I figured we could assu

One line variable declaration with multiple conditions

Howdy list. I'm trying to one lineify this: my $guts = $firstchoice || ''; if(!$guts && $use_second_choice_if_first_is_empty) { $guts = $secondchoice; } Basically my $guts = $firstchoice || $secondchoic || ''; Would be perfect except I only want to let it use $seconchoice if $use_sec

RE: stop

Please tell me this thread will stay in the archives! It's hilarious! I feel kinda bad for Mr. Kapp though, but if you're rude for no good reason what can you expect. > - Original Message - > From: [EMAIL PROTECTED] > To: [EMAIL PROTECTED] > Sent: Wednesday, January 07, 2004 14:31 > S

RE: PERL debuggers

> Are there any free PERL debuggers? Have you tried use strict and use warnigns in your scripts? Also perl -c script.pl is helpfule and then the perl debugger itself: perl -d I'm sure their's thrid party stuff but I never use any, the above does plenty for my needs. HTH Dmuey > > I once came

RE: putting $1 into a var

> Thanks to everyone who helped me with this one, I had a > deadline to meet that is now met. > > It was a missing ~ and me failing to use s on the end of my pattern > > may be of use to other users but for some reason my Linux > server needs s///s; to match over newlines and my OSX set up >

RE: stop

> > I've requested 50 times to be taken off your mailing list, > > but you still send me this unwanted mail. > > You've sent 50 emails to [EMAIL PROTECTED] > What a fun thread, I wanted to go off in my usual flare but didn't :( Maybe next time :) > I get no spam from this list ever, maybe it's

RE: stop

> I've requested 50 times to be taken off your mailing list, > but you still send me this unwanted mail. You've sent 50 emails to [EMAIL PROTECTED] I get no spam from this list ever, maybe it's coming from someone who harvested your email address from a web site or something? > I will now repo

RE: Drawing an Arc at an angle.

> On Wed, 7 Jan 2004 08:55:56 -0600, [EMAIL PROTECTED] (Dan Muey) > wrote: > >> > >> Have you thought about trying to do this on a Tk canvas? > >> The oval item lets you specify the diagonal corners of the oval's > >> bounding box. Tk::canvas can

RE: Using File::Find to generate playlists

> Ok, please don't laugh. This is my very first shot at Perl and if I > learn something, I'll be putting it to use for more important tasks. > > Thanks in advance for any comments. > > > #!/usr/bin/perl > > # A dorkey little perl scr

RE: Drawing an Arc at an angle.

> On Tue, 6 Jan 2004 11:03:14 -0600, [EMAIL PROTECTED] (Dan Muey) > wrote: > > >> Dan Muey wrote: > >> > > >> > I've made a funtion to calculate the Fresnal zone for wireless > >> > connections. > >> > > >> > Wha

RE: ActiveState ActivePerl 5.8 - system call

> Dan Muey wrote: > > > > > Also IIS is, with all due respect and apologies for being OT, crap. > > Not the case, Dan. While I would never expose IIS to the > public Internet, it is an excellent tool for debugging CGI > scripts. It puts a minimum of extraneous c

RE: case and functions

> Yo. What's up dog? :) > > I read in Learning Perl that there are no such constructs > like a case statement. Is there Yes, there is. Do you mean: if(this) { do this } elsif(that) { do that } else { do the other } > something similar or did I misread this? Als

RE: ActiveState ActivePerl 5.8 - system call

value is 128 (instead of 0). > Since it's comign from a webserver do you have an apropriate contetn type header before any output? What do your logs say about it? > Thanks > Atul > > On Tue, 6 Jan 2004 12:56:50 -0600, "Dan Muey" wrote: > > > > > &g

RE: ActiveState ActivePerl 5.8 - system call

> Hi, Howdy > > We have a perl/cgi script (ActivePerl 5.8) which calls > a executable (C code) using the system command. > Ex: > . > @args = ("C:\\perlcode\\sample.pl", "arg1", "arg2"); > system(@args); $exit_value = $? >> 8; $signal_num = $? & > 127; $dumped_core = $? & 128; print "$ex

RE: (I wish there was a) cpan user's guide

> I keep feeling I should learn more before I post here (lest I > look like a lazy > idiot who can't RTFM), but I'm getting too old to wait! > Anyway, first post: > Surely there's a module (or many) with a method to parse > URL's down to TLD. I > just can't find nice lists of them. I need to se

RE: Drawing an Arc at an angle.

> Dan Muey wrote: > > > > I've made a funtion to calculate the Fresnal zone for wireless > > connections. > > > > What I'd like to do is generate an image based on that. > Something like > > the example at: http://ydi.com/calculation/fresnel-z

RE: taking my vbscript to perl

> Hello, now I am a newbie to perl & would like to > migrate my existing knowledge... > > Would anypone give me a crash course here... how would > my following short vbscript correspond in perl. > Bravo for dumping vbscript! You'll find Perl much easier, platform independent, and just gener

Drawing an Arc at an angle.

Hello List, I've made a funtion to calculate the Fresnal zone for wireless connections. What I'd like to do is generate an image based on that. Something like the example at: http://ydi.com/calculation/fresnel-zone.php However the two connected points are rarely going to be at the same level so

RE: mass-replacing large block of text

> I don't understand why you include $split in the new file. > The text I want to get replace > is from and including that line to the end of the file. Because you said you want to replace the stuff after $split. And in your modified version it seemed like you were writing the data you split on

RE: My stupidity! (WAS RE: Mail::Sender weirdness)

> --As off Tuesday, December 30, 2003 12:33 PM -0600, Dan Muey is > alleged to have said: > > >> They are doing the Right Thing and not being an open > relay. Basically > >> the server says *one* of the persons involved has to be > > > > In both cas

RE: Art Gallery Perl Script

I have a dandy one I'm developing. Webbased admin, very configurable, fast, etc... Shall I let you know about it when it's done? Dan > -Original Message- > From: Joe Echavarria [mailto:[EMAIL PROTECTED] > Sent: Friday, December 26, 2003 12:32 PM > To: [EMAIL PROTECTED] > Subject: Art Gal

RE: My stupidity! (WAS RE: Mail::Sender weirdness)

> [snip] > > > Right, but my question is why do I need to authenticate local > > to remote and not remote to local not why do I have to > > authenticate at all. I'm well aware of the spam relay fun! :) > > [snip] > > If you are going to authenticate remote to local, that would > mean every

RE: mass-replacing large block of text

> Dan Muey wrote: > >>I have ~97 HTML documents that I need to strip the footer > >>(about 15 lines) from and > >>replace with a different block of text. The footer is > >>formatted differently in some of the > >>HTML files, but they all start wit

  1   2   3   4   5   6   7   8   9   10   >