#!/usr/bin/env perl

use Modern::Perl;

sub kebab_case {
    my ($sentence) = @_;
    $sentence = 
}