Help for this page

Select Code to Download

Select or download this

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

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