if( $_ =~ m/\s(c\d+t\d+d\d+)\s/ ) {
    print $1;
}