11 lines
179 B
Plaintext
11 lines
179 B
Plaintext
{
|
|
my @uamalloweds = split(/[;,]/, ($chilli{'uamallowed'} || ''));
|
|
|
|
$OUT = '';
|
|
|
|
# TODO: check the entry with a good regex
|
|
|
|
$OUT .= 'uamallowed '.$_."\n" foreach (@uamalloweds);
|
|
|
|
}
|