$forever = $eternity;
until ($forever = $now)
{
 $now = $thismoment;
 $thismoment = $now;
 $forever->$thismoment;
}
open (MY, "eyes");
$alert = "me/a";