1分前の月、日、時、分を表示するスクリプト

perl

#!/usr/bin/env perl

$time = scalar localtime( time - 60 );
$time =~ /(\w+)\s+(\w+)\s+(\d+)\s+(\d+):(\d+):(\d+)\s+(\d+)/;

#月、日、時、分を表示
print "$2 $3 $4:$5";

2012.3.21追加

#!/usr/bin/env perl

use Time::Piece;

$time = localtime;
$time = $time - 60;

print $time->strftime("%b %d %H:%M");

参照したURL:
http://d.hatena.ne.jp/perlcodesample/20091105/1246274997
http://search.cpan.org/~msergeant/Time-Piece-1.20/Piece.pm

ruby

#!/usr/bin/env ruby

time = Time.now
time = time - 60

#月、日、時、分を表示
print time.strftime("%b %d %H:%M")