for my $alarm (@alarms) {
    print $alarm;
}