Telefona gönder: Higher-order Perl