! output ignore
< $ cat tmp_fich
< > TUTU TOTO
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
$ rm tmp_fich
< < _x
< $ sed 's/_/ /'
< > x
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
! expect return 2
! output ignore
< < x
< $ cat
< > x
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
p * trailing spaces...
< x_
< < x_
< $ sed 's/_/ /'
< > x
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
! expect return 2
! output ignore
< < x
< $ cat
< > x
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
p * empty lines...
< a
< $ cat
< > a
< > c
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
! expect return 2
! output ignore
< > a
< >
< > c
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
<
< b
< $ cat
< > b
< > c
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh
! expect return 2
! output ignore
< >
< > b
< > c
-$ ${bindir:=.}/tesh
+$ perl ${bindir:=.}/tesh