print table({-border=>1},
  Tr([
    th(['Document', 'On TWiki']),
    map{
      td([
          a({-href=>$$_[2]},$$_[3]),
          a({-href=>$$_[1]},$$_[0])
      ])
    } @filesout
  ])
);