Select Code to Download

use strict;
use Graph::Matching;
...
my $graph$i = @sub;
@sub = [];
}

my $graph[$i] = @sub;