Re: MV4.0 and XML

[Barry Treahy <treahy@mmaz.com>]

******    message to minivend-users from Barry Treahy <treahy@mmaz.com>     ******

This is available in the present 3.1xbeta or just planned in 4.0?

Barry

mikeh@minivend.com wrote:

> But the good news on performance and for embedded Perl programmers
> will be an easy interface like:
>
> [perl]
>     $name = $Tag->value('name');
>     # transpose
>     $title = $Tag->value('title');
>
>     $result = $Tag->value( {
>                                 name => 'name',
>                                 set => "$title $name"
>                             }
>                         );
>     # Update userdb
>     $result = $Tag->data( {
>                                 table => 'userdb',
>                                 column => 'name',
>                                 key => $Tag->session( 'mv_username'),
>                                 value => $result,
>                             }
>                         );
>     return "Name is now $result, and it is updated in the user database.";
> [/perl]
>
> There will also be a row-setting interface that will allow looping
> over a database or search with easy reading/update of sets of columns.
>
> [perl]
>     my $accessor = $Tag->accessor(
>                                 { table => 'userdb', column => 'expiration', }
>                                     );
>     my $settor =   $Tag->settor(
>                                 { table => 'userdb', column => 'expiration', }
>                                     );
>
>     for (qw/ joe jane jim june /) {
>         my $expire = $accessor->($_)
>         next if $expire;
>         $settor->($_ => "20010101");
>         $out .= "Changed $_ expire to 20010101\n";
>     }
>     return $out;
> [/perl]
>



-
To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list