As others have said you've not supplied enough information, but this may get you started:

use strict;
use warnings;
use Data::Dumper;

my @strs =
  (
  '/Workstation_X_X/<someotherpath>/filename.xxx',
  '/Workstation_X_X/<someotherpath>/filename.xxx',
  '/Workstation_X_X/<someotherpath>/filename.yyy'
  );
  
my %unique;
@unique {@strs} = ();

print Dumper (\%unique);
[download]

Prints:

$VAR1 = {
          '/Workstation_X_X/<someotherpath>/filename.xxx' => undef,
          '/Workstation_X_X/<someotherpath>/filename.yyy' => undef
        };
[download]

Forgive me, I'll be more specific. With the strings that will be read in from the file, how would I make the the mappings dynamically.. So if the first $T is /Workstation_X_X/<someotherpath>/filename.xxx, would I do something like:

foreach $T (@myfile)
{
    %map = {'first', X, 'second', Y, 'third', Z);
}
[download]

Now somes the other question, being so new to perl, how do would you parse the "/Workstation_X_X/<someotherpath>/filename.xxx" strings into the X,Y,Z? Using reg expression? grep? some magic?

Your question is still remarkably unclear. What is X, Y and Z? In your filename, all I see are a couple Xes.

If you've got an ordered list of data, (which is what I surmise from your keynames of 'first', 'second', and 'third'), why are you using a hash instead of an array?

Be very specific about what you're trying to accomplish. No more nonsensical sample data. Show us what you have and what you're trying to do with it and what code you've written.

Give us three sample strings and what you expect to see in the hash.

BTW, I'd tend to avoid map as a name in the same way I'd tend to avoid grep and and and for as names.

---

Perl is Huffman encoded by design.

You can use split to split the path up on the slashes, like so:

my @values = split m:/:, $path_string;
[download]

It's not at all clear why you'd be putting that into a hash as you illustrate. It would be more interesting to make a multilevel hash that mimics the hierarchy of a list of paths:

my $hashed_path = {};
for my $path_string (@list_of_paths) {
  my $hpref = $hashed_path;
  for $dir (split m:/:, $path_string) {
    $hpref->{$dir} = {} unless exists $hpref->{$dir};
    $hpref = $hpref->{$dir};
  }
}
[download]

That might be a bit much to absorb so early in your Perl experience, but maybe not.

---

Caution: Contents may have been coded under pressure.