foreach $message(@messages)
{
    print "$message<br />";
}