#!/usr/bin/env perl

use strict;
use warnings;

sleep(int(rand(10) + 5));

print "42\n";