#!/usr/local/bin/perl

use strict;
use warnings;
open(FILE, ">height.txt") || die "file can't be opened";


while(<FILE>) {
     chomp;
     s/'/\t/g;           
   }                     
   close FILE;


##</code><code>##

Name     SSN        height
Person1  478937439  5'1
Person2  436655676  6'3