#!/usr/bin/perl -w
#after some TUC were re-assembled, need to get all the re-assembled TUGs
use strict;