use strict;
use Date::Manip;

$main::TZ= 'GMT';
print UnixDate(ParseDate("last Friday in February 2009"),"Last Friday of the month is %B %E, %Y.");