Perl code - 3 lines

Link:

Perl, pasted on Jul 16:

1
2
3

$sting = ' Mgmt-General-Other';  
$sting =~ s/^\s+//;
print $sting;

Output:

1	Mgmt-General-Other