S_del_body is sufficiently small that inlining it is a space win.
[p5sagit/p5-mst-13.2.git] / symbian / cwd.pl
CommitLineData
27da23d5 1use strict;
2use Cwd;
3my $CWD = getcwd();
4$CWD =~ s!^C:!!i;
5$CWD =~ s!/!\\!g;
6$CWD;