Help for this page
my @split = split(/\./,$file)[-1];
$ perl -e'my @split = split(/\./,$file)[-1];' syntax error at -e line 1, near ")[" Execution of -e aborted due to compilation errors.