Select Code to Download

my $size = $share->size;

use strict;
use warnings;
...
my $num_segments = $share->num_segments;

print "Segments: $num_segments\n";