sub pin { return sprintf "%04d" => int rand 10000; }