man Language::INTERCAL::Backend::Perl () - Default back end for CLC-INTERCAL
NAME
Language::INTERCAL::Backend::Perl - Default back end for CLC-INTERCAL
SYNOPSIS
use Language::INTERCAL;
my $program = compile Language::INTERCAL 'program text';
$program->backend('Perl', 'fun');
fun();
DESCRIPTION
Language::INTERCAL::Backend::Perl contains a back end for Language::INTERCAL which creates a Perl subroutine in the caller's namespace.
To call this back end, use the method backend of package Language::INTERCAL, with the string 'Perl' as first argument and the name of the subroutine to be created as second argument.
To use the resulting subroutine, just call it with up to two parameters, the standard input (a filehandle or CODE reference) and the standard output (ditto). If only one parameter is given, STDOUT is assumed for output. If none is given, STDIN is assumed for input. See the discussion towards the beginning of Language::INTERCAL.
COPYRIGHT
This module is part of CLC-INTERCAL.
Copyright (c) 1999 by Claudio Calvelli <CWlunatic@assurdo.com>, all (f)rights reserved.
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either 2 of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
SEE ALSO
A qualified psychiatrist.