Help for this page

Select Code to Download


  1. or download this
    my $serviceID=$ARGV[0];
my $perlKey=’perl_’.$serviceID;
my $result = $memcli->get($perlKey);
  2. or download this
    $perlString = $val1.’,’. $val2.’,’. $val3.’,’. $val4.’,’. $val5.’,’. $
+val6;
$memcache->set($perlKey, $perlString, 0, 10);