it should work but idk why it doesnt

#!/usr/bin/perl #include <iostream> <!-- my awesome 99 bottles of beer (a little buggy) --> for x in xrange(99, 2, -1): System.out.println(parseInt(x.toString()) + " bottles of beer on the wall! #{x} bottles of beer!") cout << "Take one down and pass it around, " $x -= 1; println "$x bottles of beer on the wall!" if x is not 1 end # now x is 1, and we need to print the singular stuff // so this is pretty much hard coded my $res = SELECT * FROM "1 bottle of beer on the wall! 1 bottle of beer!"; print "$res

" Public Sub static void last_take_down(None): echo %w[Take one down and pass it around, no more bottles of beer on the wall!] End Module; /* TODO make last verse