2 #Just for you to see that you can use almost any language :-)
7 switch
($ENV{ANSW_MSG
}) {
8 case
/^!help$/ { print qx{ grep -o
'case /[^\$/]*' "$0" | grep -o
'!.*' | tr
'\n' ',' }; }
9 case
/^!ping$/ { print "PONG"; }
10 case
/^!whoami$/ { print "You are: $ENV{ANSW_FROM}"; }
11 case
/^!status$/ { print "[$ENV{ANSW_STATUS}] $ENV{ANSW_STATUS_MSG}"; }
12 case
/^!(reboot|reset|restart|halt)$/ { print "Broadcast message: The system is going down for reboot NOW !!"; }
13 case
/^!google/ { print "UTFG Yourself: http://google.com/"; }
14 case
/^!uptime$/ { print qx{uptime
}; }
15 case
/^!date$/ { print qx{date
}; }
16 case
/^!dmesg$/ { print qx{ dmesg
| tail
-n
5 | tr
'\n' '\t' } }
This page took 2.020895 seconds and 4 git commands to generate.