The reason that it prints is that its contents are being interpolated into the string (separated by $, but that doesn't matter if you have one element).

What you probably want is to say:

if ($self->{_mydata}[2][3][0] eq "John")
  {
  print "My name is $self->{_mydata}[2][3][0]\n";
  }
[download]