Re: Trouble Chaining map function

[poj]

print map { $t = $_ ; join "\t", $t, 
  ( map {$data{$_,$t} ? 'X' : ' '} @days )
  ,"\n" } @time;

poj

[jaypal]

Thanks Poj, this does help and answers my question. Appreciate your help.