Switch to qw<>

[perl/modules/Bit-MorseSignals.git] / lib / Bit / MorseSignals.pm

diff --git a/lib/Bit/MorseSignals.pm b/lib/Bit/MorseSignals.pm
index cab439f5308aa7f4d0e381df1a9583b1409713a9..5866e6cbcd93a93e267cc5e90b633f9fdd559670 100644 (file)
--- a/lib/Bit/MorseSignals.pm
+++ b/lib/Bit/MorseSignals.pm
@@ -106,11 +106,11 @@ The constants L</BM_DATA_AUTO>, L</BM_DATA_PLAIN>, L</BM_DATA_UTF8> and L</BM_DA
 
 =cut
 
-use base qw/Exporter/;
+use base qw<Exporter>;
 
 our @EXPORT         = ();
 our %EXPORT_TAGS    = (
- 'consts' => [ qw/BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE/ ]
+ 'consts' => [ qw<BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE> ]
 );
 our @EXPORT_OK      = map { @$_ } values %EXPORT_TAGS;
 $EXPORT_TAGS{'all'} = [ @EXPORT_OK ];