use Perl

• Yup - already exists (Score:1)

  by Jon Dowland (5523) on 2004.12.16 5:32 (#36853)

  ..but I don't blame you for not finding it :) http://www.alcopop.org/temp/hilight [alcopop.org] (echoed here)

  #!/usr/bin/perl -w
  use strict;
  
  my $start_rv="\e[7m";
  my $end_rv="\e[27m";
  
  die "usage: STDIN | hilight word [words...]" if !$ARGV[0];
  
  while(<STDIN>) {
      foreach my $arg (@ARGV) { s!$arg!$start_rv$arg$end_rv!g; }
      print;
  }

  they both seem to suffer from not being able to pipe the output into less and being bashisms though.

  Reply to This

  • Re:Yup - already exists (Score:2)

    by Dom2 (2981)

    less will work fine so long as you use the -R flag [greenwoodsoftware.com]. Or stuff it in $LESS if you dislike specifying it every time.

    -Dom
    • Re:Yup - already exists (Score:1)

      by Jon Dowland (5523)

      thanks for the tip!