#!/usr/bin/perl -w

$string = '   abc   def   ';

@array1 = split " ", $string;

@array2 = split ?\s+?, $string;

print '2: ' . ( join '|', @array1 ) . "\n";

print '3: ' . ( join '|', @array2 ) . "\n";