]> git.vpit.fr Git - perl/modules/B-RecDeparse.git/blob - t/02-can.t
Switch to qw<>
[perl/modules/B-RecDeparse.git] / t / 02-can.t
1 #!perl -T
2
3 use strict;
4 use warnings;
5
6 use Test::More tests => 6;
7
8 require B::RecDeparse;
9
10 for (qw<new init pp_gv pp_entersub pp_const coderef2text>) {
11  ok(B::RecDeparse->can($_), 'BRD can ' . $_);
12 }