SSI in YaBB Template
1.1
This mod lets you use the SSI command in your template. Version 1.1 fixed a little bug.
Techneaux (Jay Silverman)
http://techneaux.mine.nu
Sources\Subs.pl
@yytemplate = ;
fclose(TEMPLATE);
foreach $yytemplate (@yytemplate){
$yytemplate =~ s/<\!--#include file\s*?=\s*?"(\S+?)"\s*?-->/${\(VNFileLoad($1))}/gi;
}
$curline =~ s~~${"yy$1"}~g;
print $curline;
}
}
sub VNFileLoad {
my $fname = shift;
my $file;
$fname =~ s/([\&;\`'\|\"*\?\~\^\(\)\[\]\{\}\$\n\r])//g;
open(FILE, $fname) || return '[an error occured while processing this directive]';
my @file = ;
close(FILE);
$file = join('', @file);
return $file;
}