[ic] Re: what exactly does $Tag->uneval() do???

interchange-users@icdevgroup.org interchange-users@icdevgroup.org
Mon Sep 30 16:10:01 2002


jonathan.prouty@ci.alexandria.va.us writes: 

> Hi! I've looked all over the place, and I haven't been able to find out exactly what $Tag->uneval() does. I'm trying to use $Tag->query() (via [perl], of course), and in the documentation for the the [query] tag, $Tag->uneval() is called a la: 
> 
>   [perl tables=products]
>     my $sql = "select sku, price, description from products
>                where price < 10 order by price"; 
> 
>     my $results = $Tag->query( { sql => $sql, } );
>     my ( $same_results, $col_name_hashref, $col_name_arrayref)
>         = $Tag->query( { sql => $sql, } ); 
> 
>     my $hash_results = $Tag->query( {     sql => $sql,
>                                       hashref => 'my_results' } ); 
> 
>     # $Vend::Interpolate::Tmp->{my_results} == $hash_results
>     # $Vend::Interpolate::Tmp->{''} == $results == $same_results 
> 
>     return $Tag->uneval( $results );
>   [/perl] 
> 
> I can't find anywhere that explains what the uneval tag is for. I'm not a perl or interchange guru either, so I haven't been able to figure it out from the context. Any chance someone could shed some light on what exactly $Tag->uneval() does? Thanks a whole bunch!!!

Basically it takes a Perl reference, e.g to an array or an hash
and returns a string representation of the data type the reference
is pointing to. 

Ciao
       Racke 

 

-- 
Prolific Interchange Consulting (Excellent German Quality !).
Take a look at Materialboerse (http://www.materialboerse.de/), WITT
(http://www.witt-weiden.de/), Boxmover (http://shop.boxmover.ch/) or
Passionshop (http://www.passionshop.com/racke). Need a shop ? Contact us.