- my $data = int(1000+500*sin($t/1000)).":".
- int(1000+900*sin($t/2330)).":".
- int(2000*cos($t/1550)).":".
- int(3220*sin($t/3420)).":$counter";
+ my $data = (1000+500*sin($t/1000)).":".
+ (1000+900*sin($t/2330)).":".
+ (2000*cos($t/1550)).":".
+ (3220*sin($t/3420)).":$counter";