use strict; #strict is same color as use, which is orange use warnings; #same as previous use 5.012; #5.012 is blue use vars; #vars is orange use Benchmark qw(:all); #Benchmark is white use List::BinarySearch; #A module I installed is white #### BEGIN { require Module; Module->import( LIST ); } #### @ISA = qw(Exporter); @EXPORT = qw(testsub); @EXPORT_OK = qw($string); #### use Module ();