input web page question

I know this question has been asked before. I have done a search on thelist and the web.. I can't find it.. thought i saved it.. help? how do a capture a web page to a var so I can strip the html? Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: input web page question

there is no code yet.. i will write the code. i need the one line that get the web page $Input=?? answers like your suck.. why do you bother. - Original Message - From: Chris Devers [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: beginners@perl.org Sent: Wednesday, October

Re: input web page question

no meaning to me... don't know what it does - Original Message - From: Chris Devers [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: beginners@perl.org Sent: Wednesday, October 12, 2005 7:05 PM Subject: Re: input web page question On Wed, 12 Oct 2005, Luinrandir wrote

Re: Package require question again

- Original Message - From: Jeff 'japhy' Pinyan [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: beginners@perl.org Sent: Monday, September 19, 2005 6:43 AM Subject: Re: Package require question again my $g = $main::{$Player{Location} . ::}{Options}; my $value = $$g

Package require question again

I want to thank everyone who has helped me with this. and I'm trying to remember to bottom post ok I have the program working again. but how do I get a var from the package? At the time you are reading this I am still experimenting wih the following: the package has this line in it.

Yet another package problem

Ok.. as asked for..the code and I hate to do this cause i'm gonna get told how everything i'm doing is wrong.. from the way I lay out the code to the way I write code to the way I don't use every damn modual under the sun But after 4 hours of not getting it to work I give up. I have

Problem with package

package Inn; BEGIN {} END {} return 1; An error comes up when I include the END{} but not the BEGIN{} any clues? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Why is my package executing everything!

My package is executing ALL subroutines when required? why? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Re: Problem with package

there must be a problem with my web host. cause now I can't even run the program. Lou - Original Message - From: Charles K. Clarkson [EMAIL PROTECTED] To: beginners@perl.org Sent: Thursday, September 15, 2005 6:49 PM Subject: RE: Problem with package Luinrandir mailto:[EMAIL

Why wont this work? Package require question

$Player{Location}=Inn require '$Player{Location}.pl'; #no error here, I think. '$Player{Location}'::HTML(); #error occurs here I'd hate to have to make a big if then else just to do this... Thanks Luinrandir -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: Why wont this work? Package require question

to change $Player{Location}=Inn; to $Player{Location}=Gate; the program would require the correct package require Gate.pl and the call on the sub HTML in that package? Gate::HTML(); - Original Message - From: Wiggins d'Anconia [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: beginners

Re: Why wont this work? Package require question

OK I got this to work require $Player{Location}.pl; but not $Player{Location}::HTML(); #error or $Player{Location}::HTML(); # ignored completely! or '$Player{Location}::HTML()';# ignored completely! or '$Player{Location}'::HTML(); #error or $Player{Location}::HTML(); #error now what? hey.. and

Re: Why wont this work? Package require question

Now you want to call the Inn::HTML() function, right? You can't easily do it if strict is turned on. Here's one way, though: my $glob = $main::{$Player{Location} . ::}{HTML}; $glob-(); ah yes.. must bottom post ok in the first line you set the var $glob to equal the package call

Re: Why wont this work? Package require question

Now you want to call the Inn::HTML() function, right? You can't easily do it if strict is turned on. Here's one way, though: my $glob = $main::{$Player{Location} . ::}{HTML}; $glob-(); Ok.. that works.. why? what is -() -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

Re: Why wont this work? Package require question

I also got this to work: $Player{Location}=Inn; $Player{Action}=Sell; require $Player{Location}.pl; # this code calls on the package # my $glob = $main::{$Player{Location} . ::}{$Player{Action}}; # $glob-(); #

Re: Why wont this work? Package require question

but what if I want to pass a var? then $glob-($foo,$bar); ? Yes sir.. we have a winner But I still have no clue as to why this works... esp. $glob-(); just looked in my book.. am I dereferencing a reference? but hey! thanks anyway! Lou $Player{Location}=Inn;

Re: Just need a yes or no answer on passing a hash to a package

PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: Perl Beginners List beginners@perl.org Sent: Friday, September 02, 2005 8:34 PM Subject: Re: Just need a yes or no answer on passing a hash to a package On Fri, 2 Sep 2005, Luinrandir wrote: Can I pass a hash to a package? Yes. (Hint: passing any

Just need a yes or no answer on passing a hash to a package

warned you! #!/usr/bin/perl use strict; require 'ReadWriteParse.pl'; #package I'm trying to put the sub in. my (%Player,$FN,%Data,$Data,$key,$value); %Player = (Name =Luinrandir,Town =Avalon,Homeland =Ireland,); #this is where the call for the package goes# %Data=%Player

Re: Just need a yes or no answer on passing a hash to a package

Message - From: Chris Devers [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: Perl Beginners List beginners@perl.org Sent: Friday, September 02, 2005 8:34 PM Subject: Re: Just need a yes or no answer on passing a hash to a package On Fri, 2 Sep 2005, Luinrandir wrote: Can I pass

Need help... packages again

/ web page: foreach $Country(@NameList::Countries) { print qq|1-$CountryBR|; print qq|2-$NameList::Lord{$Country}BR|; print qq|3-$NameList::Lord{Ireland}BR|; } on the webpage: 1-Irelandthis line ok 2-Luinrandirthis line NOT ok 3-Luinrandirthis line NOT ok 1

Re: Need help... packages again -more

-Ambros:Baird:Cabhan:Dahey:Eirnin:Fergus:Glendan:Hugh:Innis:Liam:Murtagh:Or in:Pierce:Quinn:Ronan:Scolaighe:Turlach:Luinrandir Ambros Baird Cabhan Dahey Eirnin Fergus Glendan Hugh Innis Liam Murtagh Orin Pierce Quinn Ronan Scolaighe Turlach Luinrandir 1-Iceland 2-Sigurður:Guðmundur:Jón:Gunnar:Ólafur:Magnús:Einar:Kristján:Björn:Bjarni

Need help... packages

OK.. maybe I'm trying to be too fancy. the package is: ### package Names; @Countries(Ireland,Wales); %Lord{Ireland}=(Bob,Tom); %Lord{Wales}=(Ted,Ned); return 1; # the program is: ### foreach $Country(@Names::Countries) { print

Re: Need help... packages

my alternative is this, in the program: @[EMAIL PROTECTED]::Countries; foreach $Country(@Countries) { if ($Country eq Ireland) [EMAIL PROTECTED]@NameList::IrelandLord} if ($Country eq Wales) [EMAIL PROTECTED]@NameList::WalesLord} print @Lords; } but this

Re: Need a list of files in a dir.

ooh! One I know! open(COMMAND, dir |); @files = COMMAND; Daniel -Original Message- From: Luinrandir [mailto:[EMAIL PROTECTED] Sent: Thursday, August 25, 2005 21:33 To: beginners@perl.org Subject: Need a list of files in a dir. How do I get the list of files in a DIR and put in an array

Need a list of files in a dir.

How do I get the list of files in a DIR and put in an array? I'm drawing a blank on my search for this. thanks Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Re: Need a list of files in a dir.

Thanks.. I'll look it over Lou - Original Message - From: John W. Krahn [EMAIL PROTECTED] To: Perl Beginners beginners@perl.org Sent: Thursday, August 25, 2005 6:26 PM Subject: Re: Need a list of files in a dir. Luinrandir wrote: How do I get the list of files in a DIR and put

I finally did it- Packages

I have just successfully figured out how to get the return from a package in the main program.. @Data = ReadFile::ReadFile(TownCrier.db); Wha Hoo ANYONE having more informtion on making and using packages, please let me know. My 6 book library barely mentions it! my programming just got

Question about Moduals

I am creating my own packages/moduals for a game I am writing. my question is should I create one big program with many moduals? or many small programs (one for each business in the town) with a few moduals. My concern is that loading up the moduals and a big program would slow things down...

Re: How do I make two different web pages come up from one CGI?

I want to create two web pages in two different windows from one CGI. Thanks for your input. - Original Message - From: Chris Devers [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: Perl Beginners - CGI List beginners-cgi@perl.org Sent: Wednesday, August 03, 2005 6:00 PM Subject

How do I make two different web pages come up from one CGI?

The following does not work #!/usr/bin/perl use strict; print qq|Content-type: text/html\n\n|; print qq|HTMLHEADTITLESeneschals Report/TITLE/HEADBODY|; print qq|1|; print qq|/body/html|; print qq|Content-type: text/html\n\n|; print qq|HTMLHEADTITLESeneschals Report/TITLE/HEADBODY|; print

Package question

I am just learning about making and using my own packages and moduals I have a CGI that requires a package. the package is a subroutine that is called on in the main program(CGI) The subroutine works fine as a sub in the main program. but when I put it in a package, it does not work. I thought

Package/modual question -- more

] To: beginners@perl.org Sent: Monday, July 25, 2005 10:44 AM Subject: Re: Package question Luinrandir am Montag, 25. Juli 2005 21.42: I am just learning about making and using my own packages and moduals I have a CGI that requires a package. or: uses the package is a subroutine

Re: Package/modual question -- more

Ok.. thats what I thought... thanks Lou .. in my 5 year mission to wrap my brain around perl. - Original Message - From: Jeff 'japhy' Pinyan [EMAIL PROTECTED] To: Luinrandir [EMAIL PROTECTED] Cc: beginners@perl.org Sent: Monday, July 25, 2005 2:27 PM Subject: Re: Package/modual question

hide source code 2 - online game

Speak of hiding code my web host's cgi-bin is password protected. is this enough to hide my perl-cgi code that makes the HTML pages? the player files are in the same dir as the cgi code. I have an online game, so I don't want people to cheat. now I am hearing that PHP is the way to go for maximum

Need Perl DLL's

Hallo I am editing perl in Optiperl and it says I need the Perl DLL's where do I find them? Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Read Write to file .. need help

I need to read and write to a file before allowing the anyone else to read or write. I found this on the web.. but it does not work...maybe its my version of perl? http://htmlfixit.com/cgi-tutes/tutorial_Perl_Primer_011_File_manipulation_with_Perl.php File Operation modes: open: $filepath

Re: screen size...

/A+ /p yes ?yes? did I do it.. I really don't know JS : ( just guessing... BTW .. thanks for your help! Lou. - Original Message - From: Chasecreek Systemhouse [EMAIL PROTECTED] To: Luinrandir Hernsen [EMAIL PROTECTED]; [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Sent: Thursday, November 04

Files -read write - an epiphany and question

I have been studying W/R to files... W/R to a string and to an array. and I must say I think I have it. I can read a file into an array IF i wrote the file using \n between vars, yes and I can read the entire file into a string (to later be split) by using delimiters like ,yes??? I

Re: Need to check file

sigh.. so sorry for not being more exact... I did use the quotes if (-e 'filename.dat') I guess I will have to find out the full path... Thanks Lou - Original Message - From: Bee [EMAIL PROTECTED] To: Luinrandir Hernsen [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Thursday, October 14

Need to check file

I have successfully checked a file in the same dir , my question is do I have to chdir when doing a if (-e filename.dat) and then change back to the cgi-bin dir? www.mysite.com/cgi-bin is where my perl files are. www.mysite.com/html is where the file I want to check is. chdir /html; if (-e

Do you use OptiPerl???

Any one here use OptiPerl to make CGI?? I have questions if you do. Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

cgi question

I am writing a perl cgi online game. I would like to load the graphic.gif's to the players computer and then call them from there.. ideas? JS? perl? something else? can it be done at all? where do I start looking? thnaks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands,

Re: CGI and mySQL book, any recommendation.

Real information to your answer.. I use these... CGI Programming on the world wide web / O'Reilly CGI by example / Niles Dwight CGI Programming / Hamilton www.MySQL.com If you are new to perl.. avoid the O'Reilly books... there are, IMHO, written by PhD's for PhD's the Visual books , Read

Array Question

Can I do something like this? @CityA=Suburb1, Suburb2, Suburb3; @CityB=Suburb1, Suburb4, Suburb5; $Var=TownCurrent; $NewVar=$($TownCurrent)[1]; I am trying to construct a sting from a variable. make sence? Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

Re: Questions about game design in perl

Hey What ever I did I'm sorry. Obvisious ly it upset someone... I'm gone.. you guys are way to uptight about little shit L Hernsen - Original Message - From: WC -Sx- Jones [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Wednesday, April 07, 2004 12:00 PM Subject: Re: Questions about

Questions about game design in perl

Hallo I am trying to build a game in perl. I have questions. This is a story book game... here is the story, make a choice next page..here is the story, make a choice 1-Do I set up the login file (password name and your game details) in one big file, or in many files, one file per player?

Re: More Details --- Re: Questions about game design in perl

need to know how to pass variables with the HIDDEN INPUT command from web page to web page that perl generates. Thanks for your help again Lou - Original Message - From: James Edward Gray II [EMAIL PROTECTED] To: Luinrandir Hernsen [EMAIL PROTECTED] Cc: Perl Beginners [EMAIL PROTECTED

File question

I want to write an online game... I need a to make a logon page and a new person page. I think I can do this with little help... however on the map... Do I keep one big file with all the info.. of several little files.. which is better? Thanks Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED]

Deleting a file(s) with variables _HELP!

I have a group of files I need to delete. They have a format like this. c:\game\data\(variable)info.file(variable) the actual file name is c:[EMAIL PROTECTED] I need to delete all files in this directory with the partial name of info.file where the (variable) is a wildcard. In dos it would

capturing a webpage in a variable

IS this how I capture a web page code to a variable? #!/usr/bin/perl use LWP::UserAgent; my $req; my $ua = LWP::UserAgent-new; $req = HTTP::Request-new(GET = 'http://www.yahoo.com'); print $req; ## ? from here I can print at the code for the web page?

Simple Perl code/syntax question

Hallo everyone and thank you for your previous help in basic the code would be for x=1 to 100 Select Case Case=10,20,30,40,50,60,70,80,90 then do this else else do this end select next x how is this done in perl? foreach (10,20,30,40,50,60,70,80,90); { do this; }

Re: Program to write code

I use OptiPerl from www.xakra.com Any one else use this? L Hernsen - Original Message - From: McMahon, Chris [EMAIL PROTECTED] To: [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Thursday, January 22, 2004 2:32 PM Subject: RE: Program to write code I like jEdit: www.jedit.org . It runs

Join strings problem

Hallo and thank in advance. what am I doing wrong? I'm new to Perl. my Building string is not being built. is it that I need to declare the joined strings a string?How? Lou #!/usr/local/bin/perl print qq|Content-type: text/html\n\n|; my $EW5NS5=TEST.gif; ##this is the string I need to build.

Re: need help/ advice

Yes thanks... I want to capture the code of a webpage to a string so I can pick out the stuff I want and put the code into another of my design. I will try your suggestion Is there another way to do this? with out the LWP::UserAgent I see you are using a get command.. ok I know about

Re: how to create a submit button in perl?

the submit button is part of the form command in HTML. I use perl to: print qq|formhtml commands like the submit button/form|; if thats what you are looking for check out your HTML commands for FORM Luinrandir - Original Message - From: Scot Robnett [EMAIL PROTECTED] To: Annie

Any one who knows Formmail by Matts Scripts

Hallo I need to have my form mail to 2 or 3 addresses. Anyone familiar enough with this popular program to advise??? Thanks Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

self refreshing web page question

I want to create a web page that calls on another web page and automatically refresh the other webpage every minute. can I do this in JS alone? Perl alone? or do I have to use both? Thanks for the help, I just need to be pointed in a direction... Lou -- To unsubscribe, e-mail: [EMAIL

screen size question

how do I find the current screen size of someone running my perl program? many thanks Lou

question about perl.

How do I run another perl program from within another perl program? if (x=0) { perl_ program_ 1.pl } else { perl_program_2 } exit;

Re: screen size question

: screen size question system(stty -a) should get you what you want I don't know if perl has anything 'built-in'. -JW --- Luinrandir Hernsen [EMAIL PROTECTED] wrote: how do I find the current screen size of someone running my perl program? many thanks Lou

File Transfer

Is there a way in Perl to make a directory and transfer files to it? Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Images in memory

I am writing in Perl, to create a web page. The CGI calls on itself repeatedly as you move on the map. I need to preload some small images in memory of the players computer. Javascript has a way of doing this, but since the cgi calls on itself, if I put the code in my cgi the images would only be

HTML for my perl CGI

Can anyone direct me to HTML help? Re: Tables, backround, and images Thanks Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Max Len for string in perl???

Hallo What is the maximum number of charecters in a string? $A=123456789 Lou -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Random access files in Perl????

Long ago in GW Basic there were sequential files and random access files. Does perl have the latter? I only to get (and then put) certain info in a certain place every time. If I can avoid writing the whole file every time I bet my web site hoster would appreciate it! Just point me in a

Re: Max Len for string in perl???

that it was unlimited, but I could be wrong (might have been PHP). Just keep it as short as possible. Luinrandir Hernsen [EMAIL PROTECTED] 03/04/03 05:43AM Hallo What is the maximum number of charecters in a string? $A=123456789 Lou -- To unsubscribe, e-mail: [EMAIL

Parsing variables

Hallo I need simple parsing code for a get not a post. that will yeild 4 or 5 variables. Lou #I know I need to get rid of the # Split the name-value pairs @pairs = split(//, $ENV{'QUERY_STRING'}); foreach $pair (@pairs) { # Split the pair up into individual variables.

please please comfirm (was Parsing variables)

Thank you for your help but I want to learn this too Here is the code from the HTML GET a href=move.pl?direction=NWamp;cx=5amp;cy=10amp;player=Lou;North West/a And here I think is the CGI code $input=$ENV{QUERY_STRING}; @pairs = split(//, $input); foreach $pair (@pairs)

Re: converting a list into array

Hallo I had to replace the pull down menues to text boxes on my order form. This means I need to filter out unwanted text. I need to make it alphanumeric only.for security reasons. I have red/bold the two lines I changed last time to eliminate all 0 zero orders. if you are not receiving this

need help ... text boxes/form .... alphanumeric input only

Hallo I had to replace the pull down menues to text boxes on my order form. This means I need to filter out unwanted text. I need to make it alphanumeric only.for security reasons. I have red/bold the two lines I changed last time to eliminate all 0 zero orders. if you are not receiving this

need help

This line is from a script if ($Config{'print_blank_fields'} || $Form{$field} ne '0') I need to change the last part (in bold) to read for both 0 and the empty set '' so the logic should read if ($Config{'print_blank_fields'} || $Form{$field} ne '0' or '' ) Or to say it another way I need the

Screen control again

The last question had to do with X,Y placement for alphanumerics... I ask, what about .gifs? can they be moved across the screen using some command. Also is there a command to find out the persons screen Height/width? LH

wildcard for unix????

What is the global wildcard for unix? I'm trying to chmod 755 all files in a dir... possible? chmod 755 *.* ? Thanks LH

wildcard for unix????

What is the global wildcard for unix? I'm trying to chmod 755 all files in a dir... possible? chmod 755 *.* ? Thanks LH

Please point me to a language (perl I hope)

Sorry if this is off topic, but I really don't know who else to ask. Heres what I want to do.. maybe you would be so kind as to tell me what language this can best be done in. I'm just learning perl and know HTML. within frames (or a table)... I would like to put a large gif in the backround

trying to secure text input.

Below is the code i'm using to filter out non alphanumeric charecters... however when i type ?!$BOB yeilds this: -_3f_21_24bob- The ?!$ should be stripped away and come back empty, not _3f_21_24 ANY ideas as to what I'm doing wrong??? I'm asking for an email address. my $eaddress = ;

trying to secure text input.

Below is the code i'm using to filter out non alphanumeric charecters... however when i type ?!$BOB yeilds this: -_3f_21_24bob- The ?!$ should be stripped away and come back empty, not _3f_21_24 ANY ideas as to what I'm doing wrong??? I'm asking for an email address. my $eaddress = ;

Question about GIF's

within an HTML frame... I want to run a GIF animation and make play again as required. In this animation a person is riding a horse, 4 steps of the horse is one cycle for the animation. Can perl make it recycle again without having to load each time? It is possible to load a gif once to the

more help!!!trying to match password

) thanks in advance Lou - Original Message - From: Jeff 'japhy' Pinyan To: Luinrandir Hernsen Cc: [EMAIL PROTECTED] Sent: Saturday, January 19, 2002 10:09 PM Subject: Re: help!!!trying to match password On Jan 19, Luinrandir Hernson said: Just how do I match the input

Re: more help!!!trying to match password OPPPSSSS

- Original Message - From: Luinrandir Hernson To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Sent: Saturday, January 19, 2002 10:06 PM Subject: more help!!!trying to match password Thanks Jeff . I had tried $password eq /bob/ but your way works just fine. Now

Re: help!!!trying to match password

have to use border like this ~/\bbob\b/ end of msg - Original Message - From: Luinrandir Hernson [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Saturday, January 19, 2002 6:41 PM Subject: help!!!trying to match password I have managed to get this far. I've

just bragging

guess what I found!!! and it works (mad scientist laugh) $password=~tr/A-Z/a-z/;##changes everything to lowercase $password=~tr/a-z0-9/_/c; instead of ##$password=~s/@/\_/g; ##removes@ ##$password=~s/\./\_/g; ##removes.

Password ---- cgi-perl-html

I am trying to password protect part of my website. I have the password form page done. But how to I make the pages protected so you have to go through the password page? Do i do it by passing hidden inputs from page to page? How do I force people coming in around the password page to go through

off topic - javascript question

I want to have a window loaded when someone leaves my website. does anyone know what is wrong with the following code? Thanks! script BODY onUnload=open(exit.htm, scrollbars=yes,width=250, height=400) /script

LH question about variables

if more than two people are using my perl program (an online game), do i need to create different variables for each person or does unix/apachie know who variable is whos? Each players variables are recorded to their own unique files... i just need to know about the variables.. does the

please help with perl form

My question is, What command (in my perl prog?) do i use to goto the next page? Also, do i have the part of the perl prog correct? it doesn't make the file. And what command do i use to set the CHMOD on the net file (in perl)? This is in my HTML page code: FORM

new code .. will it work?

Below is a piece of code that determines what web site you just came from. I want to put a line in their that will exclude me ###here is the working code if ($ENV{'HTTP_REFERER'} eq | '0') {$previous = $ENV{'HTTP_HOST'}$ENV{'DOCUMENT_URI'};} else {$previous =

Something wrong with my one line code

This line of code in a perl script comes up with errors. What am I missing? problems with the word print? Am I missing a / somewhere for a reserved word? maybe the 2nd Print? print Input type=\button\ Value=\Print This Page\ onClick=\parent.main.print()\\n;

Re: Perl Templates?!

I think what this oerson means is this: What is the format of a if then else statement in perl?? I know in basic is would be If (condition) then (result1) else (result2) its a matter of code syntax referral In perl is it if condition { result1 } ? Lou

if then else

ok, where did i go wrong now??? ## ##set $previous site var. ## if ($ENV{'HTTP_REFERER'} = ) {$previous = an unknown site} else {$previous = $ENV{'HTTP_REFERER'}};

string manipulation

OK.. thanks to all who helped me... i'm actually learning this thing... perl In BASIC there are commands for leftstring, midstring, and rightstring. I am looking for the perl equiv for these. maybe an example too??? not in butt tight code, but in line by line code so I can learn. THEN I'll

code to force a fresh page

Im not sure if i need to use java or perl... Heres the scratch. I want to force my webpage to a new frame/browser so I don't get my site trapped inside someone elses. Lou

referer.pl I wrote and works!!!

I am a firm believer in sharing information. here is a working program i just wrote and tested. it my not be clenched-buttock tight code. but, blast it, it works!!! Lou #!/usr/bin/perl -w use strict; use diagnostics; print Content-type: text/html\n\n; ## ##declared variables

Re: newcounter(was did i do that correctly)

; - Original Message - From: Hasanuddin Tamir To: Luinrandir Hernson Cc: [EMAIL PROTECTED] Sent: Monday, June 04, 2001 10:36 PM Subject: Re: newcounter(was did i do that correctly) On Mon, 4 Jun 2001, Luinrandir Hernson [EMAIL PROTECTED] wrote, what does: global symbol

one last attempt?

Well i'm about to chuck perl out the window this is the command line from my index.htm file !-- #exec cmd=/home/thx-1138/counter-.cgi -- I've made this so darn simple it should work. this is the perl program in my cgi-bin: #!/usr/bin/perl -w use strict; use diagnostics; my $count; $count =

Re: one last attempt?

well i cant beleive it know what the first problem was spaces after and before the double dashes. i was using !-- #exec cgi=/cgi-bin/counter-.cgi -- and the correct command is !--#exec cgi=/cgi-bin/count-.cgi-- this caused three days of hairpulling madness... I'm laughing on the outside...

counter update

from within the body of the .htm page use this command !--THIS LINE IS CORRECT-- !--#exec cgi=/cgi-bin/counter-.cgi-- This is the .cgi program #!/usr/bin/perl -w use strict; use diagnostics; my $count; $count = 12345; print Content-type: text/html\n\n; print font

did i do this correctly?

I am working on a cgi and i'm new to perl. could someone please check to see if i did this right? below is code for a program. as you can see it is going to take a lot of editing. #!/usr/bin/perl # Setup begin $counterfile =

Re: did i do this correctly?

here is the entire code it works but no .gif files appear? i set permissions to 775 on all .gif's the counter.txt file and the .pl and .cgi programs ideas if i didn't want to use the .gif's could i put a print counter.txt; somewhere #!/usr/bin/perl -w use strict;

Re: did i do this correctly?

oh ok... the . is a way in perl to concentrate the variables then? so this $counterfile = $homepage counter.txt; etc should change to $counterfile = $homepage.counter.txt; I am learning! i will not forget!!! - Original Message - From: Eduard Grinvald To: Luinrandir Hernson

  1   2   >