this is my current code
-----------------------------------------
#!/usr/bin/perl
use CGI qw(:standard);
print "Content-type: text/html\n\n";
$HTML = "message.htm";
open (HTML) or die "Can't open the file!";
print <HTML>;
close (HTML);
my $file = "productselection.txt";
open( LOG...
ummm the digits are still not counting up even tho the counter is there.
like the first time i open my .txt file i want to be able to see how many orders have been taken by the first 4 digits in the code.
say if i open a the .txt file and 15 orders have been placed, i wanna see 0015 (...
ok i got this code up until now
---------------------------
#!/usr/bin/perl
use CGI qw(:standard);
print "Content-type: text/html\n\n";
$HTML = "message.htm";
open (HTML) or die "Can't open the file!";
print <HTML>;
close (HTML);
open(FILE,">productselection.txt")...
thanks kevin, but i'm not really getting what you mena by scalar.
Could u show me how you woudl go about it?
My Current code is
---------------------------------------------
#!/usr/bin/perl
use CGI qw(:standard);
print "Content-type: text/html\n\n";
$HTML = "message.htm";
open...
Allrite, i have a website on which a customer submits there order, say if they wanted 4 of one thing ... the info would be send to a text file.
Currently i have 4 products that i am offering ... so the text file looks something like this.
'2,3,1,0'
is there a way to put a counter on the text...
no i mean that my 'index.htm' calls the perl program ... right? is there a way that i can make a subroutine inside my perl that would only be activated once i pressed submit on a different sub of my webpage ... ex.'productinfo.htm' or would i have to create a new perl program for each form?
is there a way of running a subroutine that is only activated when i press a button on my website? ... a side note ... the webpage is not the same as the webpage that called the perl code.
i have my site set up, that if i press a submit button the perl code is so post to run. Instead of the code running ... the files tries to get downaloaded onto my computer, ye know ... 'save as or open'.
I have installed activeperl and i'm using abyss server
Any way to solve this?
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.