shaka_zulu825
New member
I'm new to perl, could someone explain to me exactly how this works
my($directory, $filename) = $text =~ m/(.*\/)(.*)$/;
print "D=$directory, F=$filename\n";
The first line is the confusing line, how does the grep line work and then pass it along to $text and my($directory, $filename).
my($directory, $filename) = $text =~ m/(.*\/)(.*)$/;
print "D=$directory, F=$filename\n";
The first line is the confusing line, how does the grep line work and then pass it along to $text and my($directory, $filename).