Select Code to Download

A:50:r1
B:45:r2
C:40:r3

##########################################
# FINDING DETAILS OF A STUDENT:      #####
##########################################
...
  for (@students) {return  $_ if $_->{REGD_NO} eq $regd_no;}
  return undef;}
  print"\n\n";

Microsoft Windows [Version 6.1.7600]
Copyright (c) 2009 Microsoft Corporation.  All rights reserved.
C:\Users\x>cd desktop
...
\up1.pl line 45, <STDIN> line 2.

C:\Users\x\Desktop>