#!/usr/bin/perl -w use DBI; use Date::Calc qw(Today); use CGI qw(:standard); print "Content-type: text/plain\n\n"; $theDB = DBI ->connect ('DBI:mysql:ecsmedia', 'ecsmedia', 'S3cq8esL') or die("Cannot connect.\n"); ($year,$month,$day) = Today(); $theProduct = param("filename"); $theDate = "$month/$day/".substr($year, -2); $theReferrer = $ENV{'HTTP_REFERER'}; $Query = "SELECT * FROM productCounters WHERE Product='$theProduct' AND Date='$theDate'"; $result = $theDB->prepare($Query) or die("error preparing SQL\n"); $result->execute() or die("error executing SQL\n"); if (@row = $result->fetchrow_array) { $newCount = $row[2] + 1; $newReferrer = $row[3].",".$theReferrer; $Query = "UPDATE productCounters SET Count=$newCount, Referrers='$newReferrer' WHERE Product='$theProduct' AND Date='$theDate'"; $theDB->do($Query) or die("Invalid update"); } else{ $Query = "INSERT INTO productCounters (Product, Date, Count, Referrers) VALUES ('$theProduct','$theDate','1','$theReferrer')"; $theDB->do($Query) or die("Invalid insert"); } $result->finish(); $theDB->disconnect();

		Http://www.ecsmedia.com/graphics/ads/tmskserh.gif

		TAP IT RHYTHM PLAYER G. David Peters The Tap It Rhythm Player is a free program to be used in conjunction with Tap It Rhythm Creator. Using these two programs in combination allows teachers to develop exercises and drills for students. Teachers can purchase Tap It Rhythm Creator, create custom rhythm lessons and distribute the lessons to students for use in Tap It Rhythm Player. Once students have imported the rhythms, they can use the lesson an unlimited number of times. Once the lesson is completed the student can export their scores and send them to their teacher for easy record keeping. Download Tap It Rhythm Player: Download Windows Version Download Macintosh OS X Version Download Macintosh 8.5-9.2 Version
	Download a ZIP or StuffIt file that contains 10 sample lessons. Download one of the files to your computer and decompress it. samples.zip samples.sit