Help for this page

Select Code to Download


  1. or download this
    print "UID: $1\n"
      if ($url =~ /^http:.*\/ID=(.*)&MyToken=.*$/);
    
  2. or download this
    push (@uid_list, $1)
      if ($url =~ /^http:.*\/ID=(.*)&MyToken=.*$/);