Untitled

<?for($i=99;$i>=0;$i--){print("$i bottles of beer on the wall, $i bottles of beer.\n".($i>0?"$i bottle".($i>1?"s":"")." of beer on the wall, $i bottle".($i>1?"s":"")." of beer.\n\n":"Go to the store and buy some more, 99 bottles of beer on the wall.").");}?>