in reply to how to find out the date 'Tuesday' for this week

Ok, this is just another way to do it

use strict;
use Date::Tie;
tie my %d, "Date::Tie"; 
$d{weekday}=2; 
print $d{day};

[download]

also golfing-style:

perl -MDate::Tie -e 'tie %d,"Date::Tie"; $d{weekday}=2;print $d{day};'

In Section Seekers of Perl Wisdom