Select Code to Download

my $myGet =~ (m/(\w+\[get)/ );
my  @path = split(/\//, $_[2]);
my  $myCSS = $path[-3];
my $newLine = "[$myCSS $myGet]";