Help for this page

Select Code to Download


  1. or download this
    my ($id) = (m!/key/(\d+)!);
  2. or download this
    my ($id) = (m!/(\d+)-\d+!);
  3. or download this
    my ($id) = (m!/key/(\d+)|/(\d+)-\d+!);
  4. or download this
    my $id = $1 // $2 if m!/key/(\d+)|/(\d+)-\d+!;