DB<41> @W = @{Time::Piece::_get_localization->{weekday}} DB<42> push @W, shift @W DB<43> x @W 0 'Monday' 1 'Tuesday' 2 'Wednesday' 3 'Thursday' 4 'Friday' 5 'Saturday' 6 'Sunday' DB<44>