summary refs log tree commit diff
path: root/lib/Net/HTTP/Console/Role/Message.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Net/HTTP/Console/Role/Message.pm')
-rw-r--r--lib/Net/HTTP/Console/Role/Message.pm18
1 files changed, 18 insertions, 0 deletions
diff --git a/lib/Net/HTTP/Console/Role/Message.pm b/lib/Net/HTTP/Console/Role/Message.pm
new file mode 100644
index 0000000..4b3fce6
--- /dev/null
+++ b/lib/Net/HTTP/Console/Role/Message.pm
@@ -0,0 +1,18 @@
+package Net::HTTP::Console::Role::Message;
+
+use MooseX::Declare;
+
+role Net::HTTP::Console::Role::Message {
+
+    # XXX colors ?
+    method logger($level, $message) {
+        print "[".uc($level)."] ".$message."\n";
+    }
+
+    method print($message) {
+        print $message."\n";
+    }
+
+}
+
+1;