use strict;
my $word64 = 1;
use constant CRACKLIB  => (($word64 == 1) ? "/usr/lib64/cracklib_dict" : "/usr/lib/cracklib_dict") ;
print CRACKLIB ;