[BUG] Problems with perl babel output

[Rick Frankel <rick@rickster.com>]

Hi-

Overall, Achim's updates to perl babel processing have been
fantastic. But there seems to be a problem with :result output --
there is no way to get a table.

Also, if the results are :value, the stdout is mixed in with the
returned results.

Here are some examples:

* perl results

** default (value)
#+BEGIN_SRC perl
print "a\t1\n";
#+END_SRC

#+results:
| a | 1 |
| 1 |   |

#+BEGIN_SRC perl
print "a\t1\n";
undef;
#+END_SRC

#+results:
| a | 1 |

#+BEGIN_SRC perl
"a\t1\n";
#+END_SRC

#+results:
| a | 1 |

** output
#+BEGIN_SRC perl :results output
print "a\t1\n";
undef;
#+END_SRC

#+results:
: a	1

#+BEGIN_SRC perl :results output table
print "a\t1\n";
undef;
#+END_SRC

#+results:
: a	1