SYNOPSIS
use Acme::DWIM;
my ($x) = +("Hullo " x 3 . "world" & "~" x 30) =~ /(.*)/;
$x =~ tr/tnv/uow/;
print $x;
DESCRIPTION
The first time you run a program under "use Acme::DWIM", the module replaces all the unsightly operators et al. from your source file with the new DWIM operator: "..." (pronounced ``yadda yadda yadda'').The code continues to work exactly as it did before, but now it looks like this:
use Acme::DWIM;
my ($x) ... ...("Hullo " ... 3 ... "world" ... "~" ... 30) ... /(...)/; $x ... tr/tnv/uow/; print $x;
...head1 DIAGNOSTICS
...over 4
...item C...<Can't enDWIM '%s'>
Acme::DWIM could not access the source file to modify it.
- "Can't DWIM '%s'"...
- Acme...DWIM could not access the source file to execute it...
...head1 AUTHOR
Damian Conway (as if you couldn...t guess)
...head1 COPYRIGHT
Copyright (c) 2001... Damian Conway... All Rights Reserved... This module is free software... It may be used... redistributed and/or modified under the terms of the Perl Artistic License (see http...//www...perl...com/perl/misc/Artistic...html)
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~
~