$color1="#f3f3f3"; $color2="#a1a1a1"; $rowcolor = $alt_color++%2 ? $color1:$color2; ##

##

{
 my $num = 0; 
 use Interpolation 'rowcolor:->$' => sub { (++$color % 2) ? '#a1a1a1' : '#f3f3f3'}
};

##

##

my $out =  "    
           
        $system_names[$c]
        $name_names[$c]
        $menu_names[$c]
        $option_names[$c]
        $system_names[$c]
        Received
       
";      

##

##

my $out = qq{
        
        $names[$c]{system}
        $names[$c]{name}
        $names[$c]{menu}
        $names[$c]{option}
        $names[$c]{system}
        Received
       
};