m/A t=(d*)/;
my $t_val = $1;