SPUG: SPUG project?

William Julien moonbeam at catmanor.com
Thu Jul 27 21:51:35 CDT 2000


>
>I'll say more next week but for now I'd like to see the ideas keep rolling
>in. Keep in mind for the initial project we should probably pick something
>with the following attributes:
>
>1) Is a module (not a script or app)
>2) Finishable in a 1-2 month timeframe.
>3) Usable on Unix and Win32
>

One idea I have for a "do-able" project is a module to facilitate
the generation of a web based calendar/scheduling system.

Something like...

    use spugcal qw':monthly'; # get's top billing!
    use CGI ':standard';

    $userid = "moonbeam";
    $group = "kittens";

    %date = ("$userid $group Jul-26-2000 15:00" => "Go to the company picnic",
	     "$userid $group Jul-27-2000 08:00" => "get a life" 
	    );

    print header, start_html;
    $spugcal = new spugcal->connect( $userid, $group, $passwd )
	or die "Laughing\n";
    $calendar = $spugcal->calendar_month (
	-events    => \%dates,
	-month     => 'Jul',
	-year      => 2000,
	-bgcolor   => "lightblue",
	-textcolor => "black",
    );
    print $calendar;
    print end_html;

would print a basic monthly calendar with two events.

The module would need to handle:
    - support external data model (as shown above).
    - internal data model using DBI database administration of the events. 
    - database administration support
    - handle time zone differences 
	options to display the event in the server's, the poster's, 
	or the viewer's timezone.
    - login and security
    - account and group administration methods
    - various display views
	Monthly
	weekly
	daily
    - handle schedule conflicts 
    - email notification of events 
	done via cron, outside the web server context

I checked CPAN, and I found a few simple calendars, but nothing that
can be used as a distributed scheduler. 

Could this be a SPUG killer app?

---
   William Julien           _,'|            _.-''``-...___..--';
moonbeam at catmanor.com      /, \'.      _..-' ,      ,--...--'''
 vi is my shepherd;       < \   .`--'''      `     /| 
 i shall not font.         `-,;'              ;   ; ;  
                     __...--''     __...--_..'  .;.'  
                    (,__....----'''      (,..--''     
perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);'


 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
      Subscriptions; Email to majordomo at pm.org:  ACTION  LIST  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
 For full traffic, use spug-list for LIST ; otherwise use spug-list-digest
  Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/





More information about the spug-list mailing list