#!/usr/bin/perl use DWIM; DWIM->do(qw/what I mean/);