$s3 = AmazonS3::getInstance();
$s3->list_buckets();
foreach( $s3->buckets as $bucket ) {
        print "looking at $bucket->name\n";
        $files = $bucket->list_contents();
        foreach( $files as $file ) {
                print "... deleting $file->name: ";
                if( $file->delete() ) print "okay\n";
                else print "failed\n";
        }
        print "... deleting bucket: ";
        if( $bucket->delete() ) print "okay\n";
        else print "failed\n";
}