my $cadena = 'C:\Users\Gordoa\Documents\UNI\4ÂșCurso\ProyectoFinGrado\server\public_html\AndroidDataMining\iLogand\ID-357841036752224\com.android.deskclock_3404.out'; my($ID, $out) = $cadena =~ m/\\ID-(\d+)\\(.+?)_/; print "[$ID][$out]\n";