Select Code to Download

2010-12-01T20:15:20.000+01:00
2010-12-01T21:10:18.000+01:00
2010-12-01T21:15:40.000+01:00
...
to
for example 
2010-12-01,20:15:20.000+01:00

#!usr/bin/perl -w
open(IN,'<transaction');
open(RE,'>>res');
...
print RE $a;}
close IN;
close RE;