| is used by Perl to mean OR - you probably need to escape it, like this:

$setstr =~ /(.*)\|\|$/

If you always want to remove two pipes from the end of a line, you could also use the substitute function:

$setstr =~ s/\|\|$//;

Hope this helps
--Foxcub