surely.....

msgsnd( $major_tom => $ground_control),
    $_->step([qw/D O O R/])
    and ($_/1.0 != $_) # hmm - peculiar
    and ($stars{time} ne $stars{time - (24 * 3600)})
    );
[download]

:)