#!/usr/bin/env perl
use strict;
use warnings;
my $input_dir = shift @ARGV;
opendir(my $dh, $input_dir) or die;
my @files = sort {$a->{mtime} <=> $b->{mtime}}
map { {filename => $_, mtime => -M "$input_dir/$_"} }
grep {!/^\./} readdir($dh);
close($dh);
print "newest: $files[0]{filename}\n";
print map {"$_->{filename} $_->{mtime}\n"} @files;
オリオンビール株式会社では、この度「オリオンクラフトシリーズ」第一弾として、Ryukyu Pale Ale(琉球ペールエール)を発売する事となりましたのでお知らせいたします。
まず第一弾として、現在全米で大ブームとなっているIPA(India Pale Ale、インディアペールエール)スタイルのビールを発売いたします。IPAとは、ホップの香りと強い苦味が特徴の上面発酵ビールです。
今回、IPAの名称を基にし、RPA(琉球ペールエール)と名づけ、南国沖縄の雰囲気にマッチしたフルーティな香りと、引き締まったビターテイストが特徴のIPAスタイルのビールを開発いたしました。

ブックマークレットが復活しましたブックマークレットが使えなくなったので昔の方法で対処してました。
