package Luhn 2;
use strict;
use warnings;

sub is_luhn_valid {
  my ($input) = @_;
}

1;