s2p only does sed-to-Perl translation when 's2p' is its program name. 
This presents us with two problems 1). The program name is 's2p.com', 
not 's2p'.  2). $0 appears to be broken and only returns the 
extension rather than the base name of the program, so we get 'com' 
instead of 's2p.com' (see debug output below).

#1 can probably be solved by using File::Basename in s2p, but can 
anyone direct me to where $0 is implemented so I can try to see what 
the problem is with that?


main::(d0:[craig.perl.x2p]s2p.com:515):
515:    my $doGenerate  = $0 eq 's2p';
  DB<2> p $0
com

-- 
________________________________________
Craig A. Berry
mailto:[EMAIL PROTECTED]

"... getting out of a sonnet is much more
 difficult than getting in."
                 Brad Leithauser

Reply via email to