Hello,
not sure if this is what you are looking for, but you could use CBWFQ and specify the packet length:
class-map PACKETSIZE
match packet length max 1500
!
policy-map MATCHPACKET
class PACKETSIZE
set precedence 4
!
interface FastEthernet0/0
service-policy input MATCHPACKET
HTH,
GP