Select Code to Download

sub unique_id() {
    # Use Apache's mod_unique_id if available
...
    $id =~ tr|+/=|-_.|;     # make non-word characters URL friendly
    return $id;
}

sub untaint_cart_id($) {
    my $old_id = shift;   
...

    return $cart_id;
}