[ic] perl problem with $Tag->set...
Chris Snow
interchange-users@icdevgroup.org
Sat Mar 8 18:38:03 2003
I am trying to run some decode a variable for input to an sql query. I
can't get it to work. Can anyone please give me some pointers?
[perl]
$name="sm_type";
if ($Tag->cgi($name) == 1) { $BODY="Aural" };
if ($Tag->cgi($name) == 2) { $BODY="Piano Trio" };
if ($Tag->cgi($name) == 3) { $BODY="String Trio" };
if ($Tag->cgi($name) == 4) { $BODY="Ensemble with wind" };
$name="sm_fulltype";
$Tag->set($name, $BODY);
[/perl]
[query sql="select sku, description, price from products where
prod_group='sheet music' and category='[value sm_fulltype]' order by
category2;"
Thanks,
Chris Snow