First parse it using a regexp, e.g.:

my ($yr,$mth,$day,$hr,$min,$sec,$sgn,$hr2,$min2)
  = /^(\d+)\-(\d+)\-(\d+)T(\d+)\:(\d+)\:(\d+)(.)(\d+)\:(\d+)$/;
[download]

Then subtract 1900 from the year and 1 from the month. The values are then compatible with localtime() and other library functions for manipulation and formatting.