Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
    $customer->{'id'} = $ARGV[0];
    $cache->set($ARGV[0], $customer, "10 minutes" );
}
  2. or download this
    #!/usr/bin/perl -w

...
    $customer->{'id'} = $ARGV[0];
    $cache->set($ARGV[0], $customer, "10 minutes" );
}