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
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
