[ create a new paste ] login | about

Link: http://codepad.org/L4VpuIyb    [ raw code | output | fork ]

Perl, pasted on Mar 20:
1
2
3
use File::Basename;
#print basename("/hello/foo.txt");
print dirname("/foo.txt");


Output:
1
/


Create a new paste based on this one


Comments: