Help for this page

Select Code to Download

Select or download this

my $line = 1 |  0.116 0.088 0.173 0.624;
@prob = $line =~ m/(\b0\.[0-9][0-9][0-9])/g;
print $prob[0], "\n";
print $prob[1], "\n";
print $prob[2], "\n";

Select or download this
```
0.088
0.0173
0.624
```