#!/opt/local/bin/perl
# 1 219055 
# 2 225876 
# 3 232696 
# 4 239517
# 5 246338
# 6 253157
# 7 259975
# 8 266796
# 9 273613
# 10 280435
# 11 287253
# 12 294071
# 
# start = 219055/22050 = 9.934467
# interval = 0.3092743 seconds
# end < 4:45.900 = 285.900
#
my $start =  9.934467;
my $interval =  0.3092743;
my $stop = 285.900;
for (my $n=0; $start + $n*$interval < $stop; $n++) {
        my $value = $start + $n*$interval;
        printf("%g\t%g\t%d\n", $value, $value, $n+1);
 }
