#!/usr/bin/perl -Tw
use Test::More tests => 1;
ok( grep( /examples/, @INC ) );