fork download
  1. $_ = 'url?a=1&name=test&id=2';
  2. s/^([^&]*)(&[^&]+)(&.*)$/$1&newname=againtest$3/;
  3. print $_;
Success #stdin #stdout 0s 4596KB
stdin
Standard input is empty
stdout
url?a=1&newname=againtest&id=2