Help for this page

Select Code to Download


  1. or download this
    {
        package WidgetPool;
    ...
    # stand down 'foo', stand up $w:
    WidgetPool::is_running('foo') or croak "Um, 'foo' not running.\n";
    WidgetPool::replace( 'foo', $w );