version 1.17, 2010/01/16 06:07:13 |
version 1.18, 2010/01/19 18:53:36 |
|
|
#!/usr/bin/perl |
#!/usr/bin/perl |
# $AFresh1: todo.pl,v 1.16 2010/01/12 23:46:40 andrew Exp $ |
# $AFresh1: todo.pl,v 1.17 2010/01/16 06:07:13 andrew Exp $ |
######################################################################## |
######################################################################## |
# todo.pl *** a perl version of todo.sh. Uses Text::Todo. |
# todo.pl *** a perl version of todo.sh. Uses Text::Todo. |
# |
# |
|
|
use Getopt::Std; |
use Getopt::Std; |
use Text::Todo; |
use Text::Todo; |
|
|
use version; our $VERSION = qv('0.0.1'); |
use version; our $VERSION = qv('0.1.0'); |
|
|
# option defaults |
# option defaults |
my $config_file = $ENV{HOME} . '/todo.cfg'; |
my $config_file = $ENV{HOME} . '/todo.cfg'; |