Tatsuki SUGIURA
sugi****@users*****
2006年 7月 12日 (水) 21:22:13 JST
Index: slashjp/docs/boilerplates/task diff -u /dev/null slashjp/docs/boilerplates/task:1.2 --- /dev/null Wed Jul 12 21:22:13 2006 +++ slashjp/docs/boilerplates/task Wed Jul 12 21:22:13 2006 @@ -0,0 +1,23 @@ +#!/usr/bin/perl -w +# This code is a part of Slash, and is released under the GPL. +# Copyright 1997-2005 by Open Source Technology Group. See README +# and COPYING for more information, or see http://slashcode.com/. +# $Id: task,v 1.2 2006/07/12 12:22:13 sugi Exp $ + +use strict; + +use Slash::Constants ':slashd'; + +use vars qw( %task $me ); + +$task{$me}{timespec} = '0 0 0 * *'; +$task{$me}{timespec_panic_1} = 1; # if panic, this can wait +$task{$me}{fork} = SLASHD_NOWAIT; +$task{$me}{code} = sub { + my($virtual_user, $constants, $slashdb, $user, $info, $gSkin) = @_; + + +}; + +1; +
スラド