summaryrefslogtreecommitdiff
path: root/i/serialplot/toto.pl
diff options
context:
space:
mode:
authorburg2004-09-16 21:56:23 +0000
committerburg2004-09-16 21:56:23 +0000
commita71794a21bc198974ff2bd144e0a372c28b7654a (patch)
treec4da85ee14ee8b125f09fe7e678b8d6aab6fd680 /i/serialplot/toto.pl
parent4cec479dc34b237e6975c3cf232490e95a70a31e (diff)
Initial revision
Diffstat (limited to 'i/serialplot/toto.pl')
-rw-r--r--i/serialplot/toto.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/i/serialplot/toto.pl b/i/serialplot/toto.pl
new file mode 100644
index 0000000..9c95718
--- /dev/null
+++ b/i/serialplot/toto.pl
@@ -0,0 +1,10 @@
+#!/usr/bin/perl -w
+use strict;
+
+my $a = 0;
+
+while (1)
+{
+ print sin ($a * 3.14), ' ', cos ($a * 3.14), "\n";
+ $a += 0.02;
+}