- or download this
cat header.txt $(perl tao.pl --today)
- or download this
__.....-.. +-+-+-+-+-+ +-+-+-+ +-+-+ +-+-+-+-+-+
...
'` _,' | first run for the GNL license. |
'--. _..-' O-----------------------------------O
- or download this
sub daily_tao
{
...
HEAD
printf "%s: %s\n%s", @{ $chapter[$day_index] };
...
- or download this
...
'today' => \&daily_tao,
'B-today' => \&daily_tao(1), ## ADDS A BANNER
...
- or download this
perl tao.pl --B-today | tkmore -
- or download this
perl tao.pl --B-today | perl -e'while (<>){print($_,$/) if ($_=~s/^/
+/ && $_=~s/[\r\n]//g)}'| Xdialog --rc-file ~/.ocrebox.rc --title="To
+day's TAO" --textbox - 0 0 &