summaryrefslogblamecommitdiff
path: root/lib/Net/HTTP/Console/Role/Message.pm
blob: 1fcac63b6fce65e5a5d7bbf143c719bdfc57bb95 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11










                                                
                              





                            
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 message($message) {
        print $message."\n";
    }

}

1;