print drop_the_first('1234'); 
sub drop_the_first {
	split '', shift;
	shift;
	return join '',@_;
}