in reply to Get Cookies for Form Input
Good luck!# /usr/local/bin/perl -w use CGI::Cookie; # retrieve the cookie collection my %cookies = fetch CGI::Cookie; # retrieve the user_id cookie from the collection my $user_id = $cookies{"user_id"}; # lookup some user data (e.g. account balance) based on the user's id my $balance = GetBalance($user_id); # return the data to the user print "text/xml\n\n"; print <<EOF; <vxml version="2.1"> <form> <block> <prompt>Your balance is $balance</prompt> <goto next="main.vxml"/> </block> </form> </vxml> EOF # retrieve the user's account balance given their id sub GetBalance { my $user_id = @_; return "10000.00"; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Get Cookies for Form Input
by Anonymous Monk on Sep 18, 2010 at 23:23 UTC |