1 setopt ERR_EXIT PIPE_FAIL EXTENDED_GLOB GLOB_STAR_SHORT
11 [[ -d issues ]] || die You must run that command in directory with issues/
14 $PERL -mFile::Spec -le "print File::Spec->abs2rel(@ARGV)" $1:a $2:a
18 $PERL -npe 's/(-+)/$1-/g ; s/ /-/g'
22 $PERL -npe 's/([^-])-([^-])/$1 $2/g ; s/-(-+)/$1/g'
27 for i ({1..40}) print -n -- -