use File::Spec::Functions qw/ canonpath /;

# it's a good idea to use relative path for portability

my $platform_independent_path =
       canonpath "../data/somepath/somedata.txt";

my $directory_separator =
       canonpath "/";