Search results for query: *

So I need 6 fields? Well that's a start, thanks for that information! But now I feel very discouraged because if it's adding NULL to some fields and values to some others (without names), that means everything has to be in a set proper order. There's no way I can figure all that out :( Thanks...

Yep. I know what the error means, I just don't know what's wrong and what to add/change. This is the actual code that's failing <code> my $sth = $dbh->prepare("INSERT INTO $categories_table VALUES (NULL, '$catname', '$catdesc', NULL, NULL, '$caticon')"); $sth->execute; if...

...varchar(32) my $dbh = DBI->connect("DBI:mysql:$edt_dbase", $mysql_user, $mysql_pass) or print DBI->errstr; my $sth = $dbh->prepare("SELECT * FROM $users_table WHERE user_id = '$user_id' AND user_password = '$userpass'"); $sth->execute; my $sth = $dbh->prepare("INSERT INTO...

Looks like you need to use binmode.

I would forget about the header, redirect/post to a THANK YOU page and use a regex if you must to break your file name and location into a link. I have to do this all the time.

I love how most people believe meta tags are dead and I find it very silly. Meta tags are still important today even though they're not used the same way they used to. So is this still related to SEO? Of course it is. And there are still thousands of meta engines out there which still use...

I am writing another script to help with SEO and I need to know every possible syntax-correct way to make a meta tag. Below is what I have so far. don't worry about doing mixed up quotes (ie: name='name"...). Can you think of any more? <meta name = "name" content = "content" \> <meta...

I looked through their site and am very unimpressed by their "beliefs" on SEO in general. Actually I'm not looking for a keyword suggestion tool but instead a tool that displays how often that word was searched. I've used word tracker but that's what I'm wondering about. Where are THEY...

I am trying to write a script that parses content from a REAL server which has search results. I tried using http://inventory.overture.com/d/searchinventory/suggestion/ but you can't search pluralized words (such as scripts or women). Anyone know of another HUGE place that does something...

<i>"I can't believe that PERL makes this function difficult."</i> <b>it's not!</b> Here's another way. # convert from number to letter # using chr() my $number = chr(65); # A # convert from letter to number # using ord() my $letter = ord(A); # 65

Why not store into a hash so you don't have to check to see if the GUID already exists?

$a= join ' ', unpack 'C*', $a; Hope this helps.

I can tell you right now exactly what the error is. It's a premature end of script headers. This wasn't meant to be a CGI script but instead just Perl. Try using this one on your website instead. #!/usr/bin/perl use warnings; use strict; use CGI qw/:standard/; print header...

Oh wow, that works awesome. I am not a huge fan of OOP but it got rid of the exporter function and enables them to create any variable they want. Can you explain what this is doing? sub new{ my $pkg = shift; my $obj = {@_}; $obj = bless {%$obj},$pkg || die 'unable to bless object!'...

I hate regexes, they give my nightmares and people always correct me on them. But here I go! This is untested. $string =~ m/<a href="([^"]+)">([^<\/a>]+)<\/a>/gi;

Where's the strict? *shifty eyes* Bad Paul! :) One thing I haven't seen before is "values" print NEWFH values %Links; I deal with hashes on a daily basis and when I need them to spit output to a file, I always use foreach my $key (%hash) { print "$hash{$_}\n"; } But I guess if...

This code definitly works on my system and MikeLacey says it works on his. I don't know why it doensn't work on yours, even if you have an extremely outdated Perl package it should work. Maybe you need to reinstall Perl? That's the only solution I can come up with without knowing what the...

#!/usr/bin/perl use warnings; use strict; my $string = qq(<p align="right">); $string =~ s/"/'/g; print $string; Yields <p align='right'>

$string =~ s/"/'/g;

Sorry, I am even more confused. Can any of you tell me what's wrong with my code now? Or from here tell me how I can make it work? Module package MetaParser; use Exporter; @ISA = 'Exporter'; @EXPORT_OK = qw(getm); use strict; use LWP::Simple; sub getm { my $url = @_; print "url is...