use strict;
use User::pwent;

while ( my $user = getpwent ) {
  if ( $user->expire && $user->expire <= time ) {
    printf "%s expired (%s)\n",
      $user->name, 
      scalar(localtime($user->expire));
  }
}