{
    my $save_friend_info = sub {
        # . . .
    };
    
    $save_friend_info->(@args) or die $!;
}