perl – Moose角色中的方法名称冲突

package logrole;

use Moose::Role;
use POSIX;
use namespace::autoclean;

package otherrole;

use Moose::Role;
use File::Temp;
use namespace::autoclean;

package myclass;

use Moose;
use namespace::autoclean;
with 'logrole','otherrole'; 

package main;

use strict;
use warnings;
use myclass;

运行这个给出：

Due to method name conflicts in roles 'logrole' and 'otherrole',the methods 'SEEK_CUR','SEEK_END',and 'SEEK_SET' must be implemented or excluded by 'myclass' at /home/user/perl5/perlbrew/perls/perl-5.22.1/lib/site_perl/5.22.1/x86_64-linux/Moose/Exporter.pm line 419
Moose::with('logrole','otherrole') called at roles.pl line 29

根据docs,你可以在使用这样的角色时排除方法名称：

package logrole;

use Moose::Role;
use POSIX;
use namespace::autoclean;

package otherrole;

use Moose::Role;
use File::Temp;
use namespace::autoclean;

package myclass;

use Moose;
use namespace::autoclean;
with 'logrole','otherrole' => { -excludes => ["SEEK_CUR","SEEK_END","SEEK_SET" ] };

package main;

use strict;
use warnings;
use myclass;

这解决了名称冲突,但是这个解决方案的问题是尝试在otherrole中导入POSIX会产生数百个名称冲突,因此在模块myclass中排除所有这些的修复似乎非常混乱.

如何导入(或写入)这些角色以避免方法名称冲突？