Select Code to Download

    my ($value) = $var =~ /\(([0-9]+\.[0-9]+)\),[0-9]+$/;

The regular expression:

...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------