Help for this page

Select Code to Download


  1. or download this
      DB<159> @date = (" PERIOD 13 OCT 06 OCT" =~ m/ PERIOD (\d\d) (\w\w\w
+) (\d\d) (\w\w\w)/) 
 => (13, "OCT", "06", "OCT")
  2. or download this
      DB<164> ucfirst lc $date[1]
 => "Oct"