#!/usr/bin/perl

while(<>) {
    chomp;

print "
<a border=0 href=/images/matt-desert-pics/m_$_><img src=/images/matt-desert-pics/s_$_></a>
";

}
