my $warte_auf_flanke=0;
while($daten=...)
{
if($daten > 5)
  {
  $warte_auf_flanke=1;
  }
if($warte_auf_flanke and $daten < 3)
  {
  $warte_auf_flanke=0;
  sub_die_bei_flanke_aufgerufen_wird();
  }
}