chomp(my $angle = <STDIN>);
$angle = sin $angle;