my $short = ( m/^(.{1,20})/ ) ? $1 : '';