Select Code to Download

sub strip_tags{
    my $string = shift;  # Or my $string = $_[0];
    $string =~ s/<[^>]+>//gs;
    return $string;
}