#!/usr/bin/perl -w

open SSG, "<ADRX.ssg" || die "can\'t open ADRX.ssg";

@ssg = <SSG>;
chomp @ssg;

print $ssg[93];