在變量範圍內的Perl變量

Question

根據papertype的條件，我將如何範圍爲該變量？

我已經嘗試了幾種方法，我得到的錯誤，我很困惑。

sub paperdisplay_getPaperLink { 
    my ($self, $args) = @_; 
    my $paper = $args->{paper}; 
    my $linktext = $args->{linktext}; 
    my $session = $args->{session}; 

    my $query = $self->request; 
    my $password = $query->param('password'); 

    if ($paper->{Type} eq 'Break') { 
     my $url = $something; 
    } else { 
     my $url = $somethingelse; 
    } 

    my $link = qq(<a title="$linktext" target="other" href="$url">$linktext</a>); 

    return $link; 
} 

Answer 1

你必須聲明它在你想使用它的塊。如果你聲明它的if或else塊內，它只會存在那裏。塊結束時變量將被銷燬。

my $url; 
if ($paper->{Type} eq 'Break') { 
    $url = $something 
} else { 
    $url = $somethingelse 
} 
# $url still exists down here 

Answer 2

使用Conditional Operator初始化的變量，而不需要一個if塊：

my $url = $paper->{Type} eq 'Break' 
    ? $something 
    : $somethingelse;