From 7e2e008a55ad633903a75dec0cf6db507f5439fb Mon Sep 17 00:00:00 2001
From: Dan Buch <daniel.buch@gmail.com>
Date: Tue, 4 Jan 2011 21:26:55 -0500
Subject: [PATCH] working through operator examples

---
 cli/operators.pl | 63 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 63 insertions(+)
 create mode 100644 cli/operators.pl

diff --git a/cli/operators.pl b/cli/operators.pl
new file mode 100644
index 0000000..090a712
--- /dev/null
+++ b/cli/operators.pl
@@ -0,0 +1,63 @@
+sub println {
+    printf("%s\n", shift());
+}
+
+
+println(4 % 3);
+
+println(4 % 2);
+
+println(-4 % 3);
+
+println(4 ** 2);
+
+println(2 ** (1/2));
+
+my $foo = 1;
+
+println($foo--);
+
+println($foo);
+
+println("dog");
+
+$foo = 1;
+
+println(--$foo);
+
+println($foo);
+
+$foo = 'd';
+
+println(--$foo);
+
+println($foo);
+
+$foo = 'Z';
+
+println($foo++);
+
+println($foo);
+
+$foo = 'Hello';
+$foo .= ', world';
+println($foo);
+
+my $bar = '+';
+$bar x= 6;
+println($bar);
+
+print '$a = ';
+my $a = <STDIN>;
+print '$b = ';
+my $b = <STDIN>;
+
+
+if ($a == 5 && $b == 2) {
+    print "I like cookies\n";
+}
+
+
+if ($a == 5 && $b == 2 || $c == 2) {
+    print "I like cookies\n";
+}