my $vim = Text::VimColor->new( string => $perl, vim_options => [ qw( -RXZ -i NONE -u NONE -N -T xterm ) ], ); #### s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; = qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)