zero-try « perl6 « arne-sommer « challenge-031 - github/perlweeklychallenge-club.git - Unnamed repository; edit this file 'description' to name the repository.

about summary refs log tree commit diff

path: root/challenge-031/arne-sommer/perl6/zero-try

blob: 9a93f19269636347f7e2251b549f67ff3d040b95 (plain)

#! /usr/bin/env raku

unit sub MAIN (Numeric $a = 10, Numeric $b = 0);

my $c = $a / $b;

try say "a/b = $c";

say "Division by zero detected." if $!;