I've always found it annoying that the DBI Shell does not allow the
user to escape the command prefix, so I spent a couple minutes looking
at Shell.pm, and came up with the following diff.  Please consider
this for any upcoming updates to DBI.  Thank you.

*** Shell.pm~   Mon Jun  4 12:13:42 2001
--- Shell.pm    Sun Apr 14 18:27:14 2002
***************
*** 352,358 ****
        $current_line = "${prefix}quit" unless defined $current_line;
  
        if ( $current_line =~ /
!               ^(.*?)
                $prefix
                (?:(\w*)([^\|>]*))?
                ((?:\||>>?).+)?
--- 352,358 ----
        $current_line = "${prefix}quit" unless defined $current_line;
  
        if ( $current_line =~ /
!               (^|^.*?[^\\])
                $prefix
                (?:(\w*)([^\|>]*))?
                ((?:\||>>?).+)?

Reply via email to