#!perl
use strict;
use warnings;
use Perl::Programmer;
my $justnoxx = Perl::Programmer->new(
    name => 'justnoxx',
    contact => '*?=>./\\\\',
    articles => 'http://pragmaticperl.com',
    cpan => 'http://search.cpan.org/~justnoxx',
    github => 'https://github.com/justnoxx/',
);
# Email:
# perl -e '$_="*?=>./\\\\";y; -/:-@[-`{-};`-{/" -;;print;print "\@gmail.com\n";'