$line = '<:KEYWORD:4:>';
$value = 5;
$line =~ s/<:KEYWORD:([^:>]*):?>/($1 != 0)? ($value * $1) : $value/e;
print "$line";