#!/usr/bin/perl
use strict;
$_="one  two three	four";
split;
print $_[2];