Select Code to Download

#! /usr/bin/perl
use strict;
...
symlink 'file', 'new_link';
rename new_link => 'link';
show_stat();