#!/usr/bin/perl # # bin/worker/xpost # # TheSchwartz worker for crossposting # # Authors: # Allen Petersen # # Copyright (c) 2009 by Dreamwidth Studios, LLC. # # This program is free software; you may redistribute it and/or modify it under # the same terms as Perl itself. For a copy of the license, please reference # 'perldoc perlartistic' or 'perldoc perlgpl'. use strict; BEGIN { require "$ENV{LJHOME}/cgi-bin/ljlib.pl"; } use LJ::Worker::TheSchwartz; use DW::Worker::XPostWorker; schwartz_decl( $_ ) foreach (DW::Worker::XPostWorker->schwartz_capabilities); schwartz_work(); # Never returns.