[Koha] Translating Script tmpl_process3.pl giving error

[arnab]

Dear All,

I'm trying to use the script tmpl_process3.pl under script/misc/translator
for generating a PO file. But when executing the file it is giving error....

I think the error is on the line no. 63 of the tmpl_process3.pl  

sub text_replace_tag ($$) {
    my($t, $attr) = @_;
    my $it;
    # value [tag=input], meta
    my $tag = lc($1) if $t =~ /^<(\S+)/s;
    my $translated_p = 0;
    for my $a ('alt', 'content', 'title', 'value') {
	if ($attr->{$a}) {
	    next if $a eq 'content' && $tag ne 'meta';
	    next if $a eq 'value' && ($tag ne 'input'
		|| (ref $attr->{'type'} && $attr->{'type'}->[1] =~
/^(?:hidden|radio|text)$/)); # FIXME
	    my($key, $val, $val_orig, $order) = @{$attr->{$a}}; #FIXME
	    if ($val =~ /\S/s) {
		my $s = find_translation($val);
		if ($attr->{$a}->[1] ne $s) { #FIXME
		    $attr->{$a}->[1] = $s; # FIXME
#### ERROR ####       $attr->{$a}->[2] = ($s =~ /"/s)? "'$s'": "\"$s\"";
#FIXME     #### ERROR ####
			$translated_p = 1;
		}
	    }
	}
    }
    if ($transl......
.................


Could anybody suggest why the script is giving error at that line number?


With regards,


Arnab Sadhukhan
CDAC, Kolkata
India

-- 
View this message in context: http://www.nabble.com/Translating-Script-tmpl_process3.pl-giving-error-tp19386575p19386575.html
Sent from the Koha - Discuss mailing list archive at Nabble.com.