c2f48d62673797abb150886ce9b9ead3828bae96
2 #Just for you to see that you can use almost any language :-)
7 switch
($ENV{PURPLE_MSG
}) {
8 case
/^!help$/ { print "What did you expected? A help?! :-P"; }
9 case
/^!ping$/ { print "PONG"; }
10 case
/^!whoami$/ { print "You are: $ENV{PURPLE_FROM}"; }
11 case
/^!(reboot|reset|restart|halt)$/ { print "Broadcast message: The system is going down for reboot NOW !!"; }
12 case
/^!google/ { print "UTFG Yourself: http://google.com/"; }
13 case
/^!uptime$/ { print qx{uptime
}; }
14 case
/^!date$/ { print qx{date
}; }
This page took 0.31693 seconds and 3 git commands to generate.