my @images = (...);

# new one each minute
my $display = $images[(time/60) % @images];