Select Code to Download

use v6;

my $file_name = "Z2020_G_004_202202161115.html";
...
for @table_data {
    print( "{.join: ';'}\n" ) if .elems;
}

Clasification;Descrip;Cod Program;Descrip Program;Clasification Progra
+m;Credits;Payment
; ;1360; ;Services;150.000,00;62400
0,00; ;20.504,57;20.504,57;Services;0,00;-20.504,57
0,00; ;59.179,70;59.179,70;Services;6.254,79;-59.179,70
0,00; ;16.518,85;16.518,85;Services;0,00;33.481,15

use v6;
# use lib $*PROGRAM.IO.parent.add: 'lib';
# use Grammar::Debugger;
...
        print( "{.join: ';'}\n" ) if .elems;
    }
}

Clasification;Descrip;Cod Program;Descrip Program;Clasification Progra
+m;Credits;Payment
;;1360;;Services;150.000,00;62400;0,00;;20.504,57;20.504,57;Services;0
+,00;-20.504,57;0,00;;59.179,70;59.179,70;Services;6.254,79;-59.179,70
+;0,00;;16.518,85;16.518,85;Services;0,00;33.481,15

use v6;
grammar HTML_table
...
    $output_file.print("{ .join: ';'; }\n") for $parser<row>>>.made;
}
$output_file.close;

...
    </div>    
  </body>
</html>