How do you plan to solve it?
module sipo4 ( input CLK, input RST, input serial_in, output reg [3:0] Q ); always @ (posedge CLK or posedge RST) begin if(RST) begin Q<=4'b0; end else begin Q<={serial_in,Q[3:1]}; end end endmodule