diff --git a/ch4/ex4-4.raku b/ch4/ex4-4.raku
new file mode 100644
index 0000000..2b88714
--- /dev/null
+++ b/ch4/ex4-4.raku
@@ -0,0 +1,6 @@
+sub MAIN ($num1, $num2) {
+	say "sum is {$num1 + $num2}";
+	say "difference is {$num1 - $num2}";
+	say "product is {$num1 * $num2}";
+	say "quotient is {$num1 / $num2}";
+}