perl c:\scitech\src\perl\findint3.per