To create an output file, use open and print to a filehandle:

open my $fh, '>', 'output.txt' or die "cannot open output.txt: $!";
foreach my $attrib (@licenses) {
    my $name  = $attrib->getAttribute('name');
    my $count = $attrib->getAttribute('count');
    print $fh "$name:$count\n";
}
[download]