The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.


Acme::LookOfDisapproval - Send warnings with ಠ_ಠ


version 0.007


    use Acme::LookOfDisapproval;
    ಠ_ಠ 'you did something dumb';


Use ಠ_ಠ whenever you would use warn, to express your profound disapproval.



Behaves identically to "warn" in perlfunc.


I wrote this as an exercise in using unicode in code, not just in a string. Then, it became an interesting learning experience in how to cleanly map to a core function, and re-exporting symbols.

The first draft did this:

    use Carp 'carp';
    sub ಠ_ಠ { local $Carp::CarpLevel = $Carp::CarpLevel + 1; carp @_; }

And then it became:

    BEGIN {
        no strict 'refs';
        *{__PACKAGE__ . '::ಠ_ಠ'} = *CORE::warn;

But this is even nicer:

    sub ಠ_ಠ { goto &CORE::warn }

I also played around with Import::Into to manage the export of both the utf8 pragma and the ಠ_ಠ symbol. However, that's just silly when we can call import directly on utf8 (it's a pragma, so the caller doesn't matter -- only when it is called: during the caller's compilation cycle), and then we can export our symbol by using goto to jump to Exporter.

I also discovered while writing this distribution that Dist::Zilla is not able to munge files with utf8 characters, therefore I had to switch to packaging this distribution with vanilla ExtUtils::MakeMaker; also, a number of the author and release tests that would have been added by dzil automatically didn't work either (for example, see t/00-compile.t -- qx(^$X "require $_") both needs the :binmode or :encoding(UTF-8) layer applied to STDOUT, and requires the utf8 pragma applied in the sub-perl (leading to more patches).



Bugs may be submitted through the RT bug tracker (or

I am also usually active on irc, as 'ether' at


Karen Etheridge <>


This software is copyright (c) 2013 by Karen Etheridge.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.