#!/usr/bin/perl

open F, ">symresultfiles.html";
@names=glob("u.*.*.*.txt");
foreach $a (@names) {
  print "$a\n";
  $name=$a;
  $name=~s/.txt//;
  $name=~s/u//;
  $a=~s/.txt/.gif/;
  print F "$name\n<br><img src=$a>\n";
  $a=~s/.gif/.png/;
  print F "<img src=edge.xyz$a>\n";
  print F "<img src=xyz$a>\n\n<br>";
}