print Dumper [map {$_ => get_day_name($_)} <DATA>];