>perl -wMstrict -le
"my $u =
  'http://foo.bar.de/?baz|2.0|323|91793|1|277|fee=_fie';
 print $u;
 $u =~
  s{ \A ((?: [^|]* \|){5}) \d+ (\|.*) \z }{${1}976$2}xms;
 print $u;
"
http://foo.bar.de/?baz|2.0|323|91793|1|277|fee=_fie
http://foo.bar.de/?baz|2.0|323|91793|1|976|fee=_fie