Welcome, please read and understand How do I post a question effectively?, it's better if you show people what you tried and explain how it failed. Below is an example of what I think you're looking for.

#!/usr/bin/perl

use strict;
use warnings;

use DateTime;

my $dt = DateTime->now;

my $minute = $dt->minute;

if ( $minute >= 55 ){
    print "It's within 5 minutes of an hour\n";
}else{
    print "No clock in for you!\n";
}
[download]