Help for this page

Select Code to Download

Select or download this

use 5.010;

...
    return $common;

    }

Select or download this

c:\@Work\Perl\monks\igoryonya>perl common_base_string_1.pl
#
...
ok 101 - no warnings
1..101
# Looks like you failed 4 tests of 101.