Please help with this code

Please help with this code

am 10.06.2007 21:40:21 von Mr Ryerson

This code is in the config.pl file

$config{'verifiedmembersfile'} = 'verifiedmembers.txt';
$config{'verifiedmember_html'} = '
bgcolor="f3f3f3" style="border-bottom: 2px solid gray;">
face="Tahoma" size="2">Verified PayPal Seller
$config{'paypal1'} . '"
';

my %verifiedmembers_data = ();

open (DAT, $config{'basepath'}.$config{'verifiedmembersfile'} ) ||
die("Could not open file " .
$config{'basepath'}.$config{'verifiedmembersfile'} );

while () {

chomp;

$verifiedmembers_data{lc($_)} = 1;
}
close DAT;

$verifiedmembers_data{'mytest'} = 123;

$config{'verifiedmembers_data'} = \%verifiedmembers_data;

#########################
#And this is in my auction.pl file

my $mytitle;
if ($feat_yt eq "YES"){

print "
BGCOLOR=\"$config{'boldbackground'}\">";
}
else {
print "
BGCOLOR=\"$itemrowcolor\">";
}
if ($feat_bf eq "YES") {
$mytitle = "$title";
}
else {
$mytitle = "$title";
}

my $my_verifiedmember_html;
if
(exists(${$config{'verifiedmembers_data'}}{lc($sel leralias)}))
{

$my_verifiedmember_html =
$config{'verifiedmember_html'};
}

print
"
$filler$imagedisp";
print "$config{'displistfont'}
HREF=\"$ENV{'SCRIPT_NAME'}?category=$form{'category '}&item=$file
\" >$grabberpic $mytitle$my_verifiedmember_html";
print
"$#bids$config{'currencytype'}$bid$timerem
ai n\n";
}
}

What I need is a peice of code I can place on a particular page where
there is nothing and if they are not verified a peice of text I can
add that says this seller is not verified please help

Re: Please help with this code

am 11.06.2007 07:14:54 von Jonathan Leffler

Mr Ryerson wrote:
> This code is in the config.pl file
[...snip...]
> What I need is a peice of code I can place on a particular page where
> there is nothing and if they are not verified a peice of text I can
> add that says this seller is not verified please help

Please go and read: http://www.catb.org/~esr/faqs/smart-questions.html

Please do not ask another question until you have done so.

Please do not resubmit this question until you can rewrite it to
demonstrate that you have done so.

--
Jonathan Leffler #include
Email: jleffler@earthlink.net, jleffler@us.ibm.com
Guardian of DBD::Informix v2007.0226 -- http://dbi.perl.org/