Perl Scalar에서 메소드를 어떻게 호출 할 수 있습니까?

StackOverflow https://stackoverflow.com/questions/1800136

  •  05-07-2019
  •  | 
  •  

문제

스칼라 (숫자)에서 메소드라는 코드를 보았습니다.

print 42->is_odd

코드에서 이러한 종류의 "기능성"을 달성 할 수 있도록 과부하가 필요한 것은 무엇입니까?

도움이 되었습니까?

해결책

당신은 언급하고 있습니까? 오토 보스? 또한보십시오 Perl에서 Autobox를 사용해야합니까?.

다른 팁

이것은 Autobox 기능을 사용하는 예입니다.

#!/usr/bin/perl

use strict;
use warnings;

package MyInt;

sub is_odd {
  my $int = shift;
  return ($int%2);
}

package main;

use autobox INTEGER => 'MyInt';
print "42: ".42->is_odd."\n";
print "43: ".43->is_odd."\n";
print "44: ".44->is_odd."\n";
라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top