diff --git a/bin/ips b/bin/ips
new file mode 100755
index 0000000..c358318
--- /dev/null
+++ b/bin/ips
@@ -0,0 +1,4 @@
+#!/bin/sh
+echo 'This is Interactive Perl shell'
+# rlwrap -A -pgreen -S"perl> " perl -wnE'say eval()//$@'
+rlwrap -A -pgreen -S'perl> ' perl -MData::Dumper -wnE'say Dumper[eval()]//$@'