- or download this
sub build_para
{
return $handlers{'para'}->(join "" => map { $handlers{$_->[0]}->($
+_->[1]) } @{$_[0]});
}
- or download this
my @test_data_2 = ( 'para', [
['none', 'The quick brown '],
...
}
print build_HTML(@test_data_2);
- or download this
*build_para = curry(\&build_HTML, 'para');
print build_para(\@test_data);