der. You definitely don't
want the .css file in the same folder as the cgi script! See my previous
post...
Aloha,
mel
--
mel matsuoka (vox)1.808.531.5474
Head Geek (fax)1.808.526.4040
Hawaiian Image Productions [EM
ly* access CGI scripts under a directory which has been explictly
configured to execute scripts. This is for security reasons. So basically,
trying to access anything in /cgi-bin that is /not/ executable will get you
a permission denied error. GIF and .css files are not executable, henc
internet nettiquette, as well as urban-legend detection
(http://www.snopes.com), so you don't continue to embarrass yourself in
public with dopey things like this.
Aloha,
mel
--
mel matsuoka (vox)1.808.531.5474
Head Geek (fax)
more code that I have no desire to comb through snipped ;))
What's with the "cur" bareword in the my block? And a my() declaration
should not be enclosed with braces, but parenthesis.
Aloha,
mel
--
mel matsuoka (vox)1.808.531.5474
Head Geek
really easy to
install a Perl/CGI enabled local Apache webserver.
Hope this helps. Aloha,
mel
--
mel matsuoka (vox)1.808.531.5474
Head Geek (fax)1.808.526.4040
Hawaiian Image Productions [EMAIL PROTECTED]
http://hawaiianimage.
says
that text lines must not exceed 1000 characters.
Aloha,
mel
--
mel matsuoka (vox)1.808.531.5474
Head Geek (fax)1.808.526.4040
Hawaiian Image Productions [EMAIL PROTECTED]
http://hawaiianimage.com
--
To unsubscr
one with same problem should do.
Report them to who? The Net Cops(tm) ?
--
mel matsuoka (vox)1.808.531.5474
Head Geek (fax)1.808.526.4040
Hawaiian Image Productions [EMAIL PROTECTED]
http://hawaiianimage.com
--
To unsubs
oing the length check, of course.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
ur server logs.
And of course, as always, use -w and -T in your shebang line.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [
At 12:02 PM 09/26/2001, Mel Matsuoka wrote:
>Agreed.
>
>Now if we could only get web hosting providers to agree as well.
Replying to my own post...I was wondering if anyone here can make a
recommendation on a GOOD hosting provider that supports Perl5 and
PostgreSQL (and PHP4 as well
t g r e s q l"
>
>MySQL is dead. Long Live PostgreSQL.
Agreed.
Now if we could only get web hosting providers to agree as well.
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED]
http://learn.perl.org/beginners-faq (item 3.3) you might want to check it
out for more suggestions, as well as:
Uri Guttman's Perl book reviews: http://www.sysarch.com/cgi-bin/perl_books
Tom Christiansen's camel Critiques: language.perl.com/critiques/
Perlmonks review page: http://ww
e that system crackers use, so studying exploit
scripts and having a subscription to the BUGTRAQ mailing list (or at least
a frequent browsing of the web archives) is a *requirement* for any
programmer or sysadmin who is interested in maintaining secure systems.
hope this helps...Aloha,
m
able. So if someone does happen to get
in, they can only muck up that database.
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [
rrying about your DBI include files and CGI scripts ;)
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
At 02:41 AM 08/20/2001, Mel Matsuoka wrote:
>td( [ 'First Name', $hashref->{'Firstname') ] ),
>td( [ 'Last Name', $hashref->{'Lastname') ] ),
>td( [ 'Phone Number', $hashref->{'Phonenum') ] ),
] ),
td( [ 'Last Name', $hashref->{'Lastname') ] ),
td( [ 'Phone Number', $hashref->{'Phonenum') ] ),
]
));
print p;
...
Where the $hashref key is the original fieldname in your database. I find
this much easier to manage in my h
gt;}
This code does exactly as it's supposed to :) What you want to do is put
your table method /outside/ of the while loop. Otherwise you're just
generating a new table for each fetchrow.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Al
At 02:59 PM 08/08/2001 -0700, Lynn Glessner wrote:
>Ultra-Edit has a perl-specific mode (color coding, automatic indenting, the
>normal) and has a killer "save to FTP" feature for doing your work on a
>windows station and automatically saving to a Unix box.
Ultra-Edit has almost everything to rec
and PerlBuilder...at
least for me.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
loop.
Or a better way would be to use the fetchall_arrayref() method. In one fell
swoop, this will return the whole dataset with each element of the array as
a reference to each row in the dataset.
hope this helps. Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Exe
he O.P. wants to "include" the content of external webpages in a
CGI script, much like a standard SSI. So you couldn't just open() the URL
as if its a local file.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.80
27;); or
>open (FILE, 'https://www.myurl.com');
>
>Do you know how I could do that ?
Use the LWP::Simple module.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (f
ia" dweeb--but I actually like coding Perl better
than my other "patients" to tell you the truth :)
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
JD's words, you'd have to be in a really good mood to
even bother answering a question like that.
I wouldn't ever presume to authoritatively speak for Casey on this list,
but I would think that even he would agree that while cordiality is one
thing, "spoon-feeding" wi
tag, ergo:
print a( {-href => 'http://www.foo.bar'}, 'Text to link' );
HTH..Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To uns
have a closing TABLE tag, which
would definitely cause the problem you describe.
HTH...Aloha
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe
ror log about it. Is there something special I have to do to get it to
>work?
What's this for?----^
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED]
rd CGI.pm module to create hrefs,
but imho, the benefits of doing it that way aren't worth it, as far as
readbility and maintenance are concerned.
The documentaion for CGI.pm is at:
http://stein.cshl.org/WWW/software/CGI/
HTH..Aloha,
mel
--
mel matsuokaHawaiian Im
At 11:03 AM 08/03/2001 +1000, Barrie Heck wrote:
>Hi All
>
>Have brought in text from HTML textarea through POST method into perl as
variable $FORM{message}. Want to add to the end of each line in the
variable but cannot work out how to do it. Any clues?
>
What have you tried so far?
--
To
erienced Perl
programmer. Check out Ovid's review at
http://www.perlmonks.org/index.pl?node_id=21576&lastnode_id=23304
Start with Randal Schwartz's "Learning Perl" or Andrew Johnson's "Elements
of Programming with Perl" (the latter is better if you dont have
ple:
my $mailids;
$mailids = $query->param('mailid');
Or, to be more succinct:
my $mailids = $query->param('mailid');
3. Test your code before posting to the list. Your code has numerous
*basic* syntax errors that you should have se
to print
the header for you.
Since you've gone through the trouble of use-ing CGI.pm, you might as well
use its functions instead of printing the headers out yourself.
Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.8
At 07:57 AM 07/20/2001 -0400, Helen Dickey wrote:
>Thank you so far. I now get
>"(myfile).pl has too many errors." when I try my perl script.
>Is there any debugging tool for perl scripts?
perldoc perldebug
Aloha,
mel
--
mel matsuokaHawaiian Imag
nator.
btw, try not to post responses in "jeopardy style" (aka top posting)...it
makes quoting and followups very disjointed and hard to follow...not to
mention a PITA to reformat :)
Aloha,
mel
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphage
ns any whitespace after the
terminator string as well.
Make sure that your heredoc terminator is the ONLY thing on that line.
HTH. Aloha
mel
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED]
like the "tree" view of subroutines it has. In
Perl Builder, you have to call up a seperate popup window to get a list of
subroutines)
Aloha,
mel
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMA
d other
strict-related problems.
I can tell you one thing though, elseif is NOT elsif ;)
Try it for yourself and see what you come up with.
aloha,
mel
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED]
uch as UltraEdit (http://www.ultraedit), which will make your coding life
so much better. Notepad is good for writing hello world-level scripts, but
in order to manage "real" programs and scripts, you need to have something
more robust.
Aloha,
mel
--
mel matsuoka Hawaiian I
it, Netfirms supports
everything you need to develop perl scripts. It sounds like you're doing
something wrong on your side (most likely syntax errors in your perl code).
Post the code which is giving you the problem...otherwise its next to
impossible to give you specific advice.
Aloha,
me
use VBScript,
>and it, when you did an error, it at least told the line #
>that i thinks the error is on?
Use CGI::Carp qw/fatalsToBrowser/
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED]
gt;problem, I've probably already written a column on it. :) ^
I typed in "Impressing hot chicks using obfuscated perl one-liners" and
didn't get any results from your search engine. Will you be writing a
WebTechniques column about this important topic in the nea
01 now...I can't believe his stuff is STILL as
popular as it was back in 1996.
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
allow
ExecCGI (for security reasons).
This is covered very well in the Apache server docs/faq at
http://httpd.apache.org/
HTH...Aloha,
mel
--
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED]
that hackers would first have to know the names of the tables
>> they were affecting and thus, things were secure.
>
>that sounds more like an excuse than an explanation.
Let there be one mantra that ALL programmers must repeat to themselves over
and over again until they go insane:
&quo
mpletely meaningless
to your problem...that's an just error message from the *Web-server*, NOT
perl. You need to run your script manually from the commandline with
warnings and strict enabled (or using the aformentioned CGI::Carp module so
you can see the errors from perl echo'ed to you
At 03:45 PM 07/13/2001 -0500, Camilo Gonzalez wrote:
>I don't work with a lot of programmers. I hope to get into a situation where
>I do. Is it fair to say the majority are *holes?
A LOT of them are (just read c.l.p.m ;), but thier saving grace is that you
can learn a LOT from them if you don't t
th Activestate Perl 5.6.1 on windows2000 and Perl on my
Mandrake Linux box.
--
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED](fax)1.808.526.4040
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
e strict' for every script you write.
hth. aloha,
mel
________
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED](fax)1.808.526.4040
loha,
mel
______
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
m ('cls');
aloha,
mel
__________
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
lated issue where the original poster should
have just been using CGI.pm.
I think i'll go crawl back into my philosophical hole now :)
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED](fax)1.808.526.4040
s, since I've been meaning to present this issue to
c.l.p.m for years, yet never got around to it :P
just another wannabe perl hacker on lunch break,
mel
mel matsuoka Hawaiian Image Productions
Chief Executive Alphageek(vox)1.808.531.5474
[EMAIL PROTECTED](fax)1.808.526.4040
ically streams binary data off the webserver root and allows the user to
download it. The headers I set look like this (where $fs is the filesize of
the data to be sent):
Content-Type: application/octet-stream
Accept-Ranges: bytes
Content-Length: $fs
Content-disposition: filename=downloaded.mp
t-in
function to pull off the same results. Use sprintf:
print sprintf "%.2f", $number;
Aloha,
mel
__________
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
e the
"script-kiddies" AREN'T trying.
This is all the more amazing, considering that our webstore is based on
Selena Sol's awful, Perl-4 based "Web Store" script :P (I'm rolling out a
totally revamped and redesigned site, using PHP, so dont laugh at my site
as it
cked out on buying a "User
Friendly" comicstrip book on Amazon the other day for only $3.88!
Aloha,
mel
______
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.
o find out where the technical flaws are in this book from some of
the more enlightened Perl reviewers.
I also think the O'reilly Perl Cookbook is fabulous too (in the same vein
as the Black Book).
I know you only asked for one book, but I don't believe there is such a
thing as "THE book&q
xt
>
>and
>
>list assigned _to_ [a scalar]
So your example would fit in the "list assignment _in_ scalar context"
category...the keyword being "assignMENT", and not "assignED"
aloha,
mel
___
and yes I use $q->endform;
Please show the actual code you are using, otherwise its very difficult to
help pinpoint your problem
Aloha,
mel
__
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek
At 04:53 AM 06/21/2001, Mel Matsuoka wrote:
>> Check for a line something like
>"print hidden(-name='.cgifields')"
oops, i meant "print hidden(-name=>'.cgifields.')"
what the hell am i doing awake at 4:30 in the morning? :P
______
At 10:45 AM 06/21/2001 -0400, Moon, John wrote:
>I keep seeing these "extra" hidden fields in my source ...
>
>Does anyone know where/what/why they are being generated ?
>
>
>
If youre using the CGI.pm module, theres most likely a subroutine or other
part of your code that is explicitly printi
e out why my win32
developed scripts bomb out on my unix boxen...when the problem was just
that I forgot to change the shebang line to point to the unix perl path!
Aloha,
mel
__
mel matsuokaHawaiian Image Productions
Chi
gt;};
I think this works better than any regexp could possibly accomplish! :)
Aloha,
mel
______
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
I wrote:
>
> $word .= 'o' x $starlength;
of course i meant to say:
$word .= '*' x $starlength;
Food takes priority over proper perl syntax right now :)
________
mel matsuoka Hawaii
if ($badwords_hash{$word}) {
$starlength = length($word) - 1;
$word = substr($word,0,1);
$word .= 'o' x $starlength;
}
print $word;
}
}
I know this is inefficient and slow, t
accessmysql.com/
Hope this helps!
Aloha,
mel
______
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
DBC driver.
Spend some time reading through the official DBI pages at
http://dbi.perl.org/ . All the specifics you need to know are there.
HTH...Aloha!
__
mel matsuokaHawaiian Image Productions
Chie
At 02:38 PM 06/14/2001 -0400, Brett W. McCoy wrote:
>On Thu, 14 Jun 2001, Mel Matsuoka wrote:
>
>> IMO, telnet *should* be considered "defunct", except when using it for
>> debugging and diagnostic purposes (i.e. telnetting directly to service
>> ports). If you (
gh
time that you should, for security's sake.
Aloha,
mel
______
mel matsuokaHawaiian Image Productions
Chief Executive Alphageek (vox)1.808.531.5474
[EMAIL PROTECTED] (fax)1.808.526.4040
70 matches
Mail list logo
