Select Code to Download

#!/usr/bin/perl -w
use strict;
...

#print the "formula"
print "$left ($group)^{$exp}$source\n";