$cmd = [  qw(p4 tag -l ), TEST_$options{r}_$date, $options{v}  ];
run3($cmd, \$stdin, \$stdout, \$stderr); 
print "\n$stderr\n";

##</code><code>##

syntax error at perl.pl line 197, near "$options{r"
Execution of perl.pl aborted due to compilation errors.