#!/usr/bin/perl # your code goes here my $test = '2016-05-01T00:00:00'; my $uusi = $test =~ r/(\d+)-(\d+)-(\d+)T00:00:00/$1-$2-$3/ ;
Standard input is empty
Standard output is empty
Bareword found where operator expected at prog.pl line 6, near ")T00" (Missing operator before T00?) syntax error at prog.pl line 6, near "+)" Execution of prog.pl aborted due to compilation errors.