Date manipulation: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,290: / Line 2,290: @@
 load "stdlib.ring"
-thedate = "March 7 2009 7:30pm EST"
+dateorigin = "March 7 2009 7:30pm EST"
 monthname = "January February March April May June July August September October November December"
 for i = 1 to 12
-     if thedate[1] = monthname[i]
+     if dateorigin[1] = monthname[i]
         monthnum = i
      ok
 next
-thedate = str2list(substr(thedate, " ", nl))
+thedate = str2list(substr(dateorigin, " ", nl))
 t = thedate[4]
 t1 = substr(t,"pm", "")
@@ Line 2,311: / Line 2,311: @@
   ap = "am"
 ok
-see d + " " + t1 + ap + nl
+see "Original - " + dateorigin + nl
+see "Manipulated - " + d + " " + t1 + ap + nl
 </lang>
 Output:
 <pre>
-/03/2009 7:30 am
+Original - March 7 2009 7:30pm EST
+Manipulated - 08/03/2009 7:30am
 </pre>