Enjoy a randomly generated fortune:
$ fortune | cowsay _________________________________________ / === ALL USERS PLEASE NOTE \ | ======================== | | | | There has been some confusion | | concerning MAPCAR. | | | | (DEFUN MAPCAR (&FUNCTIONAL FCN &EVAL | | &REST LISTS) | | | | (PROG (V P LP) | | | | (SETQ P (LOCF V)) | | | | L (SETQ LP LISTS) | | | | (%START-FUNCTION-CALL FCN T (LENGTH | | LISTS) NIL) | | | | L1 (OR LP (GO L2)) | | | | (AND (NULL (CAR LP)) (RETURN V)) | | | | (%PUSH (CAAR LP)) | | | | (RPLACA LP (CDAR LP)) | | | | (SETQ LP (CDR LP)) | | | | (GO L1) | | | | L2 (%FINISH-FUNCTION-CALL FCN T (LENGTH | | LISTS) NIL) | | | | (SETQ LP (%POP)) | | | | (RPLACD P (SETQ P (NCONS LP))) | | | | (GO L))) We hope this clears up the | \ many questions we've had about it. / ----------------------------------------- \ ^__^ \ (oo)\_______ (__)\ )\/\ ||----w | || ||
$output = shell_exec("/usr/games/fortune | /usr/games/cowsay"); echo $output;